validation sur deux colonnes

  • Initiateur de la discussion Initiateur de la discussion mikeo
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

mikeo

XLDnaute Occasionnel
Bonjour le Forum,

Je voudrais savoir s'il y a une astuce de faire apparaître sur les listes de validation les données de deux colonnes d'une BDD mais que la cellule ne prend en compte que les données de la première colonne.

Merci à tous

M
 

Pièces jointes

Re : validation sur deux colonnes

Bonjour,

Non pas les deux colonnes les unes à côté des autres, mais bien les lignes les unes sous les autres.
Vois la pièce jointe.

Voici comment procéder :
Nommer (menu Insertion / Nom / Définir) la plage de la colonne A.
Faire réference à ce nom dans la Validation.
Retourner dans le menu Insertion / Nom / Définir et modifier la réference de Feuil1!$A$4:$A$8 en Feuil1!$A$4:$B$8
Ne pas retourner dans le menu Validation, car la référence est considérée comme fautive et il n'y a pas moyen de sortir de cette fenêtre sans effacer la validation.

abcd
 

Pièces jointes

Re : validation sur deux colonnes

Bonjour,


-Créer un nom de champ MaListe avec 1 colonne:
=DECALER(Feuil1!$A$4;;;NBVAL(Feuil1!$A:$A);1)
-Créer le menu avec Données/Validation/Liste
-Modifier le nom de champ avec 3 colonnes:
=DECALER(Feuil1!$A$4;;;NBVAL(Feuil1!$A:$A);3)

10 ADAM ---
20 EVE ---
30 CAIN ---
40 ABEL ---
50 SETH ---

Pour empêcher de choisir la 2e colonne:

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
  If Not Intersect([D4:D4], Target) Is Nothing And Target.Count = 1 Then
    p = Application.Match(Target, Application.Index([Maliste], , 1), 0)
    If IsError(p) Then Application.Undo
  End If
End Sub

JB
Formation Excel VBA JB
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
14
Affichages
505
Réponses
18
Affichages
610
Retour