Bonjour,
Je suis actuellement en train de développer un programme d'automatisation d'entrées de données et mon problème est le suivant :
Je crée une liste dans une feuille et les données contenues dans cette liste sont placées dans une autre feuille. J'ai essayé la chose suivante :
Code :
- With Selection.Validation
- .Delete
- .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
- xlBetween, Formula1:="=" & Sheets("Database" ).Range("A40:A50" ).Address
- .IgnoreBlank = True
- .InCellDropdown = True
- .InputTitle = "Selection pièce"
- .ErrorTitle = ""
- .InputMessage = "Programme " & Prog
- .ErrorMessage = ""
- .ShowInput = True
- .ShowError = True
- End With
|
mais malheureusement le code ne va pas chercher les infos dans la feuille que je souhaite, malgré qu'il y ait "Sheets(...).Range(...).Address" .
Auriez vous une solution pour mon problème ?
Merci 
