Variables dans Userform, intéré dans module

Teen -  
 Teen -
Bonjour à tous!

Je vous expose mon problème :

J'ai fait une petite macro qui a l'ouverture de mon fichier excel, fait apparaitre une fenêtre. Dans cette fenêtre, on remplit des valeurs dans une texbox et on clique sur un des trois boutons.

Dans les private sub de chaque command_click, je fais une affecatation de variable et écris une procédure qui remplit ces informations dans différentes cases de mon tableur. Le problème c'est qu'après avoir affecté mes variables, la procédure est la même et je l'ai écris trois fois, une fois dans chaque private sub des command_click

Comment puis-je alors dans mes command_click simplement affecté mes variables et écrire qu'une seule fois ma procédure?

Je vous soujaite une bonne journée!

Teen

1 réponse

f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 715
 
Bonjour,
Une solution parmi d'autres.

Dans chaque private sub command_click
affectation de variables
appel procédure avec passage des variables afféctées

ex:

private sub command1_click
affectation variable1,variable2,variableX
Call Procedure(variable1,variable2,variableX)
end sub

private sub command2_click
affectation variable1,variable2,variableX
Call Procedure(variable1,variable2,variableX)
end sub

private sub command3_click
affectation variable1,variable2,variableX
Call Procedure(variable1,variable2,variableX)
end sub

sub Procedure(variable1,variable2,variableX)
' Code commun à toutes les actions commandX_Click

end sub
1
Teen
 
Merci beaucoup!! ça allège pas mal mon code sans modifier ses fonctionnalités.
0