Duplicar cuadro de texto

[rguez]

Hola

Estoy intentando crear dos cuadros de texto, uno en donde se escribe y otro (en una hoja distinta) donde AUTOMATICAMENTE (sin pinchar ningún botón ni nada por el estilo) aparece lo mismo que estás escribiendo en el cuadro anterior.

Hasta ahora he logrado hacerlo dentro de una misma hoja con el siguiente código:

Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
TextBox2.Text = TextBox1.Text
End Sub

Lo que ahora necesito es que los cuadros puedan estar en distintas hojas "sheets"

Gracias!!

 

[t4373125]

Primero crea los 2 TextBox, uno en cada hoja. seguramente se llamaran igual pero no importa
Ya solo te faltara escribir esto:

Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
Worksheets(2).TextBox1.Value = TextBox1.Value
End Sub


En resumen, que para referenciar a cosas que estan en una hoja distinta de la actual, se tiene que empezar por: Worksheets(x).
Donde "x" puede ser el numero de la hoja o el nombre de la hoja entre comillas.