Récupérer instantanément la valeur TextBox dans une cellule excel

Résolu
sofienexcel Messages postés 72 Statut Membre -  
sofienexcel Messages postés 72 Statut Membre -
Bonjour,

Je souhaite mettre la valeur d'un textbox dans une cellule, j'utilise le code suivant:
Sheets("Feuil1").Range("f2").Value = UserForm1.TextBox1.Value
Cà ne fonctionne que si je quitte le userforme et je clique sur une autre cellule (je pense que c'est une question de refresh).
Ca manque une chose pour que le code fonctionne instantanément sans besoin de cliquer sur une cellule?

Merci

2 réponses

  1. M-12 Messages postés 1349 Statut Membre 285
     
    Bonjour,
    deux possibilités
    après avoir changer de textbox
    Private Sub TextBox1_AfterUpdate()
      Sheets("Feuil1").Range("f2").Value = UserForm1.TextBox1.Value
    End Sub
    

    sur le changement du textbox
    Private Sub TextBox1_Change()
      Sheets("Feuil1").Range("f2").Value = UserForm1.TextBox1.Value
    End Sub
    1
  2. sofienexcel Messages postés 72 Statut Membre
     
    Merci infiniment

    ca fonctionne très bien
    0