Je cherche lors de l'ouverture de ma macro, =E0 initiliser=20
ma DropDowns sur le premier element de ma liste...
Ma liste contient :
Votre choix SVP
choix 1
choix 2
choix 3
Et j'aimerais donc =E0 l'ouverture du fichier que ma liste=20
d=E9roulante affiche "Votre choix SVP" et non pas l'ancien=20
choix effectu=E9 par l'utilisateur final.
Avez vous une piste =E0 me donner?
Bien =E0 vous
Nosf=E9
Voici ce que j'ai :
.DropDowns("Zone combin=E9e 4").List (.DropDowns("Zone=20
combin=E9e 4").ListIndex)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
AV
En supposant que ta "zone de liste modifiable" (barre d'outils Formulaire) se trouve sur "Feuil1" de ton classeur A mettre dans le module de ThisWorkbook :
Private Sub Workbook_Open() Sheets("Feuil1").DropDowns("Zone combinée 4").ListIndex = 1 End Sub
AV
En supposant que ta "zone de liste modifiable" (barre d'outils Formulaire) se
trouve sur "Feuil1" de ton classeur
A mettre dans le module de ThisWorkbook :
Private Sub Workbook_Open()
Sheets("Feuil1").DropDowns("Zone combinée 4").ListIndex = 1
End Sub
En supposant que ta "zone de liste modifiable" (barre d'outils Formulaire) se trouve sur "Feuil1" de ton classeur A mettre dans le module de ThisWorkbook :
Private Sub Workbook_Open() Sheets("Feuil1").DropDowns("Zone combinée 4").ListIndex = 1 End Sub
AV
Nosfer
Un grand merci AV !!!
Nosfé
-----Message d'origine----- En supposant que ta "zone de liste modifiable" (barre d'outils Formulaire) se
trouve sur "Feuil1" de ton classeur A mettre dans le module de ThisWorkbook :
Private Sub Workbook_Open() Sheets("Feuil1").DropDowns("Zone combinée 4").ListIndex = 1
End Sub
AV
.
Un grand merci AV !!!
Nosfé
-----Message d'origine-----
En supposant que ta "zone de liste modifiable" (barre
d'outils Formulaire) se
trouve sur "Feuil1" de ton classeur
A mettre dans le module de ThisWorkbook :
Private Sub Workbook_Open()
Sheets("Feuil1").DropDowns("Zone combinée 4").ListIndex =
1