cambouis
XLDnaute Nouveau
Bonjour,
J'ai mis sur une feuil1 une comboBox (active X) avec le code suivant :
Private Sub cbxMOIS_Change()
If cbxMOIS.Value = "JANVIER" Then
Sheets("JANV").Select
End If
If cbxMOIS.Value = "FEVRIER" Then
Sheets("FEV").Select
End If
If cbxMOIS.Value = "MARS" Then
Sheets("MARS").Select
end if
cbxMOIS.Value = ""
End Sub
Je souhaiterais utiliser ce contrôle sur une feuil2, feuil 3 .... mais sans avoir à copier-coller le code pour chaque feuille. Est ce possible . En clair( enfin j'espère!) Utiliser un seul ComboxBox ActiveX pour toutes mes feuilles mais un seul code.
Merci de votre aide.
J'ai mis sur une feuil1 une comboBox (active X) avec le code suivant :
Private Sub cbxMOIS_Change()
If cbxMOIS.Value = "JANVIER" Then
Sheets("JANV").Select
End If
If cbxMOIS.Value = "FEVRIER" Then
Sheets("FEV").Select
End If
If cbxMOIS.Value = "MARS" Then
Sheets("MARS").Select
end if
cbxMOIS.Value = ""
End Sub
Je souhaiterais utiliser ce contrôle sur une feuil2, feuil 3 .... mais sans avoir à copier-coller le code pour chaque feuille. Est ce possible . En clair( enfin j'espère!) Utiliser un seul ComboxBox ActiveX pour toutes mes feuilles mais un seul code.
Merci de votre aide.
Dernière édition: