Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Liste déroulante "actualisable"?

Liste déroulante "actualisable"?

22 réponses
Avatar
Lionel
Est-il possible dans une liste déroulante de faire une entrée différente et
que cette entrée soit considérée comme un élément supplémentaire de la
liste?

Par exemple : si j'ai en liste

Lundi
Mardi
Mercredi

je veux pouvoir entrer "Jeudi"

et que la nouvelle liuste déroulante soit
Lundi
Mardi
Mercredi
Jeudi

Merci de votre aide.
Signaler un problème avec ce contenu

10 réponses

Supprimer
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
1 2 3
Avatar
Clément Marcotte
UserForm avec ComboBox. Le ComboBox est fait pour ça.

"Lionel" a écrit dans le message de news:
44357602$0$6600$
Ok ca fonctionne mais ca ne resoud pas le probleme d'origine c'est a dire
que je voudrai pouvoir entrer une donnée différente des proposition de la
liste et que cette proposition devienne un element de cette liste...comme
dans la question d'origine
Par exemple : si j'ai en liste

Lundi
Mardi
Mercredi

je veux pouvoir entrer "Jeudi" (pas dans la liste)

et que la nouvelle liste déroulante soit
Lundi
Mardi
Mercredi
Jeudi

Merci de votre aide.




Avatar
Clément Marcotte
Bonjour et merci peut-être ?


"Lionel" a écrit dans le message de news:
44357602$0$6600$
Ok ca fonctionne mais ca ne resoud pas le probleme d'origine c'est a dire
que je voudrai pouvoir entrer une donnée différente des proposition de la
liste et que cette proposition devienne un element de cette liste...comme
dans la question d'origine
Par exemple : si j'ai en liste

Lundi
Mardi
Mercredi

je veux pouvoir entrer "Jeudi" (pas dans la liste)

et que la nouvelle liste déroulante soit
Lundi
Mardi
Mercredi
Jeudi

Merci de votre aide.




Avatar
Lionel
Bonjour je l'avais dit et je dis merci des le poremier message avant meme la
reponse et je le dis quand le probleme est résolu ... logique et correction
mais jamais d'agressivité...


"Clément Marcotte" a écrit dans le message
de news: O3Co$
Bonjour et merci peut-être ?


"Lionel" a écrit dans le message de news:
44357602$0$6600$
Ok ca fonctionne mais ca ne resoud pas le probleme d'origine c'est a
dire


que je voudrai pouvoir entrer une donnée différente des proposition de
la


liste et que cette proposition devienne un element de cette
liste...comme


dans la question d'origine
Par exemple : si j'ai en liste

Lundi
Mardi
Mercredi

je veux pouvoir entrer "Jeudi" (pas dans la liste)

et que la nouvelle liste déroulante soit
Lundi
Mardi
Mercredi
Jeudi

Merci de votre aide.








Avatar
Clément Marcotte
Et puis en cherchant sur http://groups.google.com/advanced_search dans le
forum Excel,ou le forum Word, je ne sais plus, un message assez long pour
gérer des ListBoxes/ComboBoxes, (avec ajouter/enlever des éléments et mise à
jour automatique), à partir de banals fichiers texte, pour ne pas dépendre
d'une feuille Excel. La seule chose qui manque, c'est une routne de tri.

Bonjour et merci de ne pas nous prendre pour des esclaves.

"Clément Marcotte" a écrit dans le message
de news:
UserForm avec ComboBox. Le ComboBox est fait pour ça.

"Lionel" a écrit dans le message de news:
44357602$0$6600$
Ok ca fonctionne mais ca ne resoud pas le probleme d'origine c'est a dire
que je voudrai pouvoir entrer une donnée différente des proposition de la
liste et que cette proposition devienne un element de cette liste...comme
dans la question d'origine
Par exemple : si j'ai en liste

Lundi
Mardi
Mercredi

je veux pouvoir entrer "Jeudi" (pas dans la liste)

et que la nouvelle liste déroulante soit
Lundi
Mardi
Mercredi
Jeudi

Merci de votre aide.








Avatar
Clément Marcotte
MON OEIL!

Dans tout ce fil, le seul bonjour, c'est celui de ce message.


"Lionel" a écrit dans le message de news:
44357ed7$0$1156$
Bonjour je l'avais dit et je dis merci des le poremier message avant meme
la
reponse et je le dis quand le probleme est résolu ... logique et
correction
mais jamais d'agressivité...


"Clément Marcotte" a écrit dans le message
de news: O3Co$
Bonjour et merci peut-être ?


"Lionel" a écrit dans le message de news:
44357602$0$6600$
Ok ca fonctionne mais ca ne resoud pas le probleme d'origine c'est a
dire


que je voudrai pouvoir entrer une donnée différente des proposition de
la


liste et que cette proposition devienne un element de cette
liste...comme


dans la question d'origine
Par exemple : si j'ai en liste

Lundi
Mardi
Mercredi

je veux pouvoir entrer "Jeudi" (pas dans la liste)

et que la nouvelle liste déroulante soit
Lundi
Mardi
Mercredi
Jeudi

Merci de votre aide.












Avatar
Clément Marcotte
Bon, admettons, il y a quelques mercis dansce fil.


"Lionel" a écrit dans le message de news:
44357ed7$0$1156$
Bonjour je l'avais dit et je dis merci des le poremier message avant meme
la
reponse et je le dis quand le probleme est résolu ... logique et
correction
mais jamais d'agressivité...


"Clément Marcotte" a écrit dans le message
de news: O3Co$
Bonjour et merci peut-être ?


"Lionel" a écrit dans le message de news:
44357602$0$6600$
Ok ca fonctionne mais ca ne resoud pas le probleme d'origine c'est a
dire


que je voudrai pouvoir entrer une donnée différente des proposition de
la


liste et que cette proposition devienne un element de cette
liste...comme


dans la question d'origine
Par exemple : si j'ai en liste

Lundi
Mardi
Mercredi

je veux pouvoir entrer "Jeudi" (pas dans la liste)

et que la nouvelle liste déroulante soit
Lundi
Mardi
Mercredi
Jeudi

Merci de votre aide.












Avatar
JB
Bonjour,

http://cjoint.com/?ehfBjk2Hjf

Si l'élément frappé n'appartient pas à la liste, il est ajouté
(Liste dans le contrôle)

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$2" Then
If InStr(Target.Validation.Formula1, Target.Value) = 0 Then
Target.Validation.Modify Formula1:= _
Application.Substitute(Target.Validation.Formula1, ";", ",") &
"," & Target.Value
End If
End If
End Sub

JB
Avatar
JB
Bonjour,

Voir PJ http://cjoint.com/?ehfsHAqrmn

Si l'élément frappé n'appartient pas à la liste, il est ajouté
(Liste dans le contrôle)

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$2" Then
If InStr(Target.Validation.Formula1, Target.Value) = 0 Then
Target.Validation.Modify Formula1:= _
Application.Substitute(Target.Validation.Formula1, ";", ",") &
"," & Target.Value
End If
End If
End Sub

Cordialement JB
Avatar
Lionel
Bonjour a noouveau

Ca fonctionne merci

Juste une nouvelle petite question:
Quelle modif apporter si je veux que ma liste deroulante telle que décrite
dans votre fichier soiir valable sur toute la colonne B par exemple puisque
c'est de celle la que votre fichier part.

Merci
Lionel
Avatar
JB
http://cjoint.com/?ehlJOcgVOO

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 And Target.Row > 1 And Target.Count = 1 Then
If InStr(Target.Validation.Formula1, Target.Value) = 0 Then
Target.Validation.Modify Formula1:= _
Application.Substitute(Target.Validation.Formula1, ";", ",") &
"," & Target.Value
End If
End If
End Sub

JB
1 2 3