Macro para seleccionar una hoja

With Sheets("Hoja1")
.Select
.[A1].Select
End With

o

Sheets("Hoja1").Select
Sheets("Hoja1").[A1].Select

Nota: Para poder seleccionar una celda, es necesario que la hoja que la contiene este activa.

Saludos,
KL


"Ramón" wrote in message news:

Hola :

Si en una macro aparece la línea:

Sheets("Hoja2").Select

Excel busca Hoja2 y se sitúa en el extremo izquierdo superior de ella

Lo que quiero es que se sitúe en una hoja cuyo nombre está en la celda A1 de
Hoja1.
Pensaba que sería algo así como:

Sheets( Sheets ( "Hoja1" ) . [a1] ) . Select

Pero da un mensaje de error

¿Qué he de hacer?

Gracias

hola, Ramón !

Si en una macro aparece la linea: Sheets("Hoja2").Select
Excel busca Hoja2 y se situa en el extremo izquierdo superior de ella
Lo que quiero es que se situe en una hoja cuyo nombre esta en la celda A1 de Hoja1.
Pensaba que seria algo asi como: Sheets( Sheets ( "Hoja1" ) . [a1] ) . Select
Pero da un mensaje de error
Que he de hacer?

utilizar 'explicitamente' la propiedad '.Value' o... '.Text' del objeto 'Range'' [p.e.]

Sheets(Sheets("hoja1").[a1].Text).Select

nota: a pesar de que la propiedad '.Value' es la propiedad 'por omision' de un objeto 'Range' [es decir]...
no requiere que sea explicitamente enunciada para referirse a ella...
en 'ciertas' ocasiones/circunstancias/instrucciones/... -> SI es necesario indicarla 'explicitamente'
[como en el caso que nos ocupa] :))

saludos,
hector.

hola [de nuevo], Ramón !

otras alternativas posibles [dependiendo de tus necesidades 'reales']...
para activar/seleccionar... la hoja 'mencionada' en la celda 'A1' de la 'Hoja1'...

a) para activarla/seleccionarla/... SIN ir a la celda 'A1' [sino donde el usuario la haya 'dejado']...
Range("'" & Sheets("hoja1").[a1] & "'!a1").Parent.Select ' o... -> .Activate
nota: los apostrofos son 'por si' el nombre de la mencionada hoja tuviera espacios [o solo numeros]

b) para activarla/seleccionarla/... por omision -siempre- en la celda 'A1'...
Application.Goto Sheets(Sheets("hoja1").[a1].Text).[a1]
nota: esta 'forma' no requiere de los apostrofos :))

probablemente habra otras variantes/alternativas/... -?- [cuestion de seguir buscandolas] :D

saludos,
hector.

Hola a ambos:

Muchísimas gracias por vuestras respuestas, es una auténtica "gozada"
estar en contacto con gente tan amable y dispuesta a echar una mano, la
cantidad de tiempo que me "regaláis" es impagable.

Hasta siempre