buscar en varios rangos

en cado hoja del libro tengo definido un rango, rango1, rango2, rango3, ...rango 14
Quiero saber si es posible ejecutar un codigo en todos los rangos, algo asi como:
          for n=1 to 14
              Application.Goto Reference:="rango(n)"
                 For Each cell In Selection
                   'ejecuto mi codigo
                Next cell 
          next  
Agradezco puedan ayudarme..

Muchísimas Gracias!!   Admiro la rapidez de tus respuestas, solo alguien que sabe tanto puede responder de forma tan simple y rápida. Felicitaciones!