Discussion :

[jcaspar]

Bnjour à tous !

J'utilise word 2003 et je souhaite dans une macro vba
utiliser une texte box que l'utilisateur remplit.
Je souhaiterais que lorsque le champ est rempli il se copie sur le document.
Ma méthode est imparfaite car à chaque ajout de lettre le mot se copie
à nouveau...

Merci d'avance pour vos idées et conseils

Jean Marc

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
 
Private Sub TextBox17_Change()
'comment copier le contenu rempli vers le fichier ?
Dim a
a = TextBox17
Selection.TypeText Text:=a

[Heureux-oli]

Salut,

C'est pas le bon évènement.

L'évènement Change se produit à chaque changement !
Essaie avec l'évènement AfterUpdate.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Private Sub TextBox17_AfterUpdate()
'comment copier le contenu rempli vers le fichier ?
Selection.TypeText Text:=Me.TextBox17
End Sub

De même, pas besoin de passer la valeur à une variable, tu peux directement l'utiliser.