Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2013 Cellule liste déroulante réciproque

Créer une discussion

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 !

S'inscrire
C

christ61

XLDnaute Nouveau
Bonjour

Je viens de m'inscrire sur votre forum pour essayer d'avoir un peu d'aide.

Je souhaite créer une feuille excel dans laquelle j'aurai une colonne code et une colonne intitulé.
Chaque cellule doit etre avec liste déroulante.
exemple colonne A liste 10,20,30,40 auquel sont associés respectivement les noms A,B,C,D

Si je mets 10 en A1 doit s'afficher A en B1
et inversement, c'est là ou je bloque
Si je mets A en B1 doit s'afficher 10 en A1

Je ne sais pas si je m'explique correctement mais je vous mets un fichier.

Je vous remercie par avance pour l'aide que vous pourrez m'apporter.
 

Pièces jointes

Trier par date Trier par votes
Re : Cellule liste déroulante réciproque

Bonjour Christ61 et bienvenue sur XLD, le forum,

Ce que tu demandes n'est pas évident, car dès que tu mets une donnée dans une cellule, tu supprimes la formule qu'elle contenait.

Je pense que c'est faisable par vba, mais je passe mon tour.

En attendant, j'ai modifié tes listes de validation pour avoir le résultat que tu escomptais. L'inconvénient est qu'il faut re-cliquer sur la cellule précédente pour afficher ta valeur.
Fais un essai en supprimant d'abord les valeurs de A1 , puis B1, etc..
Code: 
=SI(B1="";code;INDEX(A10:B13;EQUIV(B1;B10:B13;0);1))

Cordialement.
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Cellule liste déroulante réciproque

Salut

Un tableau (nommé ici T) permet de s'affranchir de sa position de sa longueur (ajout , suppression de lignes) sans toucher à la macro.
Code: 
Private Sub Worksheet_Change(ByVal R As Range)
  Application.EnableEvents = 0
    If R.Address = "$A$1" Then [B1] = [T].Columns(1).Find(R)(1, 2) 'liste en A1 vers B1
    If R.Address = "$B$1" Then [A1] = [T].Columns(2).Find(R)(1, 0) 'liste en B1 vars A1
  Application.EnableEvents = 1
End Sub

Nota : les 2 lignes avec "Application.EnableEvents" sont inséparables et servent à éviter des appels incessants à l'évènement.
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Cellule liste déroulante réciproque

Bonsoir

Merci de vos réponses aussi rapides.
Pour l'instant je n'ai pas eu le temps d'éplucher les fichiers mais ils font ce que je recherche.
C'est super.

merci encore et bonne soirée à tous.

Christophe
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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

N
  • Résolu(e)
XL 2021 liste déroulante en cascade
Réponses
11
Affichages
475
natadom
N
E
  • Question Question
XL 2016 Liste déroulante "pré-chargée"
Réponses
10
Affichages
354
sylvanu
S
  • Question Question
XL 2016 formule de calcul en fonction du choix de la liste déroulante
2
Réponses
18
Affichages
1 K
Silent
S
M
  • Résolu(e)
Autres Liste déroulante et cellule vide
Réponses
13
Affichages
431
Marjo2809
M
T
  • Résolu(e)
XL 2019 Afficher un mot dans une colonne paramétrée en liste déroulante
Réponses
4
Affichages
253
telemarrk
T
B
  • Question Question
XL 2021 VBA pour générer une liste de valeurs comprise entre 2 valeurs
2
Réponses
16
Affichages
531
benjy555
B
S
  • Résolu(e)
Microsoft 365 Liste déroulante et case adjacente
Réponses
7
Affichages
266
JHA
J
Y
  • Question Question
XL 2021 Liste déroulante filtrée par les 2 premiers caractères
2
Réponses
28
Affichages
668
Dudu2
S
  • Résolu(e)
XL 2019 formule recherche qui bug
Réponses
4
Affichages
225
Sylvie J
S
R
  • Question Question
XL 2010 Problème avec liste déroulante sur des cellule déjà rempli
Réponses
6
Affichages
739
rider
R
  • Question Question
XL 2016 Liste deroulante hypertexte
2
Réponses
15
Affichages
2 K
Captain NRJ
S
  • Résolu(e)
Microsoft 365 [Résolu] Aide sur gestionnaires de noms + liste déroulante en cascade associée
Réponses
9
Affichages
1 K
djidji59430
T
  • Question Question
XL 2013 Colonne dynamique en fonction de choix d'une liste déroulante
Réponses
5
Affichages
752
JHA
J
  • Question Question
XL 2016 Aide pour maj auto de la date + selection multiple dans une liste déroulante
Réponses
5
Affichages
766
fanch55
F
  • Résolu(e)
Microsoft 365 copier coller des colonnes en fonction de la valeur d'une cellule
Réponses
8
Affichages
912
loloboc
L
S
  • Résolu(e)
Microsoft 365 [RESOLU] Excel : Calcul de prix en fonction d'un type
Réponses
4
Affichages
469
JHA
J
J
  • Question Question
Autres [Google Sheets] Recherchev, index, equiv sur liste déroulante - A l'aide !
Réponses
2
Affichages
781
Jaykerz
J
L
  • Question Question
Microsoft 365 recherche X lien entre 2 fichiers
Réponses
3
Affichages
329
lilie17
L
A
  • Question Question
XL 2010 Liste déroulante
Réponses
2
Affichages
592
WTF
T
  • Résolu(e)
XL 2010 Masquer les lignes en fonction du résultat d'une liste déroulante
Réponses
11
Affichages
773
Titi456
T
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…