Ver originales (Francés)

Recuperar instantáneamente el valor de TextBox en una celda de Excel.

Resuelto
sofienexcel Mensajes publicados 72 Estado Miembro -  
sofienexcel Mensajes publicados 72 Estado Miembro -
Bonjour,

Quiero poner el valor de un textbox en una celda, utilizo el siguiente código:
Sheets("Feuil1").Range("f2").Value = UserForm1.TextBox1.Value
Esto solo funciona si salgo del UserForm y hago clic en otra celda (creo que es una cuestión de actualización).
¿Falta algo para que el código funcione instantáneamente sin necesidad de hacer clic en una celda?

Gracias.

2 respuestas

  1.
    M-12 Mensajes publicados 1349 Estado Miembro 285
     
    Hola,
    dos posibilidades
    después de cambiar el textbox 
    Private Sub TextBox1_AfterUpdate() Sheets("Feuil1").Range("f2").Value = UserForm1.TextBox1.Value End Sub

    en el cambio del textbox 
    Private Sub TextBox1_Change() Sheets("Feuil1").Range("f2").Value = UserForm1.TextBox1.Value End Sub
    1
  2. sofienexcel Mensajes publicados 72 Estado Miembro
     
    Muchas gracias

    funciona muy bien
    0