Bonjour à tous,
J’ai un petit problème ! je veux faire une validation de données d’après une liste mais je voudrais pouvoir l’appliquer aux 12 feuilles de mon classeur sans avoir à dupliquer 12 fois la macro. Je ne parviens pas à trouver la bonne commande qui s’appliquerait à la feuille active et non au mois comme ci-dessous..
Merci de votre aide.
Voici la macro enregistrée.
[cpp]Sub Macro1()
' Macro1 Macro
activeSheets.Select
Range("Février[Type]").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertInformation, _
Operator:=xlBetween, Formula1:="=type"
.IgnoreBlank = True
.InCellDropdown = True
.ErrorTitle = ""
.ErrorMessage = "eeeee"
.ShowInput = True
.ShowError = True
End With
Range("D71").Select
End Sub[/cpp]
J’ai un petit problème ! je veux faire une validation de données d’après une liste mais je voudrais pouvoir l’appliquer aux 12 feuilles de mon classeur sans avoir à dupliquer 12 fois la macro. Je ne parviens pas à trouver la bonne commande qui s’appliquerait à la feuille active et non au mois comme ci-dessous..
Merci de votre aide.
Voici la macro enregistrée.
[cpp]Sub Macro1()
' Macro1 Macro
activeSheets.Select
Range("Février[Type]").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertInformation, _
Operator:=xlBetween, Formula1:="=type"
.IgnoreBlank = True
.InCellDropdown = True
.ErrorTitle = ""
.ErrorMessage = "eeeee"
.ShowInput = True
.ShowError = True
End With
Range("D71").Select
End Sub[/cpp]