Microsoft 365 Liste déroulante de plusieurs cellules non contiguës

Ludom05 · 22 Décembre 2022

Bonjour,

J'ai besoin de créer une liste déroulante enrichie avec les informations de plusieurs cellules non contiguës.
Je n'arrive pas a écrire la formule, pouvez vous m'aider ?

Merci
Ludom05

ZAKAO · 22 Décembre 2022

Bonjour @Ludom05,

Peux-tu joindre un fichier exemple stp ?

Merci

Ludom05 · 27 Décembre 2022

ZAKAO à dit:
Bonjour @Ludom05,

Peux-tu joindre un fichier exemple stp ?

Merci

Bonjour, ZAKAO

Voici un exemple.
Merci

job75 · 27 Décembre 2022

Bonjour Ludom05, ZAKAO,

Le code de la feuille :

VB:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim c As Range, liste$
For Each c In [C17:H27]
    If c.Interior.Color = vbRed Then liste = liste & "," & c
Next
With [C12].Validation
    .Delete
    .Add xlValidateList, Formula1:=Mid(liste, 2)
End With
End Sub

A+

Microsoft 365 Liste déroulante de plusieurs cellules non contiguës

Ludom05

XLDnaute Nouveau

ZAKAO

XLDnaute Junior

Ludom05

XLDnaute Nouveau

Pièces jointes

job75

XLDnaute Barbatruc

Pièces jointes

Discussions similaires

Microsoft 365 Liste déroulante de plusieurs cellules non contiguës

Ludom05

XLDnaute Nouveau

ZAKAO

XLDnaute Junior

Ludom05

XLDnaute Nouveau

Pièces jointes

job75

XLDnaute Barbatruc

Pièces jointes

Discussions similaires

Privacy & Transparency

Privacy & Transparency