Foro Excel

Hola amigos
Una pequeña ayudita
Tengo este codigo (en realidad es mucho mas grande) y os explico la situación
Si estoy en la hoja 2 y los datos de nombres y apodos los tengo en la hoja 1...... ¿ de que manera puedo hacer referencia a esta hoja para que se pueda visualizar correctamente ??
Gracias
Alfred



Dim hora As Double
Dim saludo As String
Dim leyenda As String

nombre = Trim(Range("A50").Text)
apodo = Trim(Range("A55").Text)

hola, la forma es dando la direccion completa del rango al cual te estas refiriendo
lo más completo seria lo siguiente

variable = WorkBooks("Mi Libro de Excel").Sheets("Hoja2").Cells(1,1)

de esta forma, yo puedo estar con un libro activo y referirme a otro libro abierto sin tener que seleccionarlo, lo mismo pasa con las hojas.
entre parentesis se coloca una variable de tipo variant, puesto que puede ser un nombre de hoja o de libro (existentes), como puede ser un numero de hoja o libro.
de no existir genera el error nro 9, "Subí­ndice fuera del intervalo"

un saludo

Dim hora As Double
Dim saludo As String
Dim leyenda As String

nombre = Trim(Sheets(1).Range(50,1))
apodo = Trim(Sheets(1).Cells(55,1))

Gracias, asunto arreglado
Un saludo