regrouper les variable d'un même userform

[Jacques25]

Bonjour à tous,

J'ai créé un userform pour mettre à jour une base de données.
Dans cet Userform
- je viens chercher le contenu de cellules que je met dans des textbox,
- je viens chercher le contenu de commentaires que je mets dans d'autres textbox
- ensuite en fonction de mon choix par des optionbutton d'autres textbox sont complétés, les commentaires mis à jour
- ...

Tout ça fonctionne très bien mais j'essaye d'optimiser l'écriture du code parce qu'à chaque commande :
- private sub userform initialize()
- private sub optionbutton click ()
- private sub commandbutton click()
je dois inscrire à chaque fois
Dim com as string, info as worksheet
set info =....
ligne =activecell.row
....
Y a t'il une solution pour que je ne l'inscrive qu'une seule fois pour tout ce qui se passe dans l'userform

Merci de votre aide.
@ plus

Jack

 

[herve62]

A ma connaissance il n'y a que le résultat d'une variable que tu peux garder mais que ta variable execute toujours la même instruction , cela ne doit pas exister jamais vu ou entendu
Sinon Tu mets tout en Private tout en haut au début de ton code dans le module ou t'utilise ta variable

Private ligne as integer , info as worsheet etc ..
Private sub essai
for ligne= 1 to 10
exemple : tu test avec un IF > si ok à ligne= 5 tu sors de la boucle et veut garder cette valeur
pour un autre module
Private Sub rappel
si tu utilises ligne ici , ce sera = 5
Voilà ce qui est possible

 

[Jacques25]

Salut Hervé,

Merci de t'être penché sur mon sujet, du coup je ne peux qu'identifier le type de variable, pour chaque commande il faut que je redéfinisse à chaque fois...
Je gagne déjà quelques lignes... je reste preneur d'autres idées si jamais.

Merci
@ plus

Jack