Tomar valor de una celda

De la siguiente manera:

Private Sub UserForm_Activate()
TextBox1.Value = Hoja1.Range("E11")
End Sub

Algo estoy haciendo mal porque no me muestra el valor de la celda

Private Sub UserForm_Activate()

TextBox5.Value=Hoja1.Range("G1")
Me sigue mostrando el TextBox5 vacio


Saludos y gracias por la ayuda
escribió en el mensaje
news:

De la siguiente manera:

Private Sub UserForm_Activate()
TextBox1.Value = Hoja1.Range("E11")
End Sub

hola,

prueba a ver con:

TextBox1.Value Worksheets(NombreDeLaHoja_entreComillas).Range("E11").Value

a ver si hay suerte (el nombre de la hoja seria el que se ve en la
pestaña de la hoja, y ponlo entre comillas)

un saludo
Ivan