Discussion :

[Victory94]

Bonjour,
j'ai réalisé un code VBA qui permet d'ajouter un élément sur une liste déroulante, il bug sur les lignes suivantes, je ne comprends pas où figure le problème.
Voici les deux lignes de code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="='Liste déroulante'!$D$2:$D$30"

[ARTURO83]

Bonjour,

Vous dites: "j'ai réalisé un code VBA qui permet d'ajouter un élément sur une liste déroulante", ce qui signifie que la liste existe déjà et le fait de vouloir ajouter un élément revient à dire qu'on la modifie, il est donc nécessaire dans un premier de supprimer l'ancienne liste déroulante avant d'en créer une nouvelle.
Donc ajoutez " .Delete
avant la ligne .Add type....

Ce qui donne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
With Selection.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="='Liste déroulante'!$D$2:$D$30"

Cdlt

[Victory94]

j'ai ajouté la ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Delete

mais il bug toujours

[unparia]

Bonjour

Je te suggère la lecture attentive de cette discussion --->>
https://www.developpez.net/forums/d1...idation-macro/

[Victory94]

Merci unparia, mais j'arrive toujours pas à résoudre mon problème.

[eriiic]

Bonjour,

si ton nombre d'éléments de ta liste est amener à varier, utilise plutôt un nom dynamique qui s'adaptera à sa longueur. Même plus besoin de vba.
eric