Bonjour
je ne suis pas développeur et ma question va peut être vous sembler bête...

j'ai 5 feuilles.
Dans mes 5 feuilles, j'ai 5 boutons dont le code est identique :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Private Sub CommandButton1_Click()
Dim FEUILLE As String
FEUILLE = ActiveSheet.Name
UserForm1.ComboBox1.Value = Sheets(FEUILLE).Range("K3").Value 'REGION
UserForm1.ComboBox7.Value = Sheets(FEUILLE).Range("K4").Value 'SUB-REGION
(...)
UserForm1.Show
End Sub
Y a t il un moyen pour avoir une seule procédure pour mes 5 boutons?
merci d'avance