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

"Lier" des cellules

  • Initiateur de la discussion Initiateur de la discussion cwam
  • 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 !

C

cwam

Guest
Bonjour,

Je cherche à lier le contenu de plusieurs (prenons 2 comme exemple) cellules dès que j'en fait évoluer une.
Ce que je cherche concrètement à avoir pour etre plus explicite:
cellule A1: une liste de nom (ex😛aris/Lyon/Marseille)
cellule B1: la meme liste de nom (Paris/Lyon/Marseille)

Comment dois je faire si je veux que les 2 cellules soient toujours identiques?

Fonctionnement:
Si je positionne A1 en Paris, alors B1 se positionne automatiquement en Paris
Ensuite, si je positionne B1 en Lyon (toujours par ma liste), A1 se repositionne en Lyon

Merci 🙂
 
Re : "Lier" des cellules

Bonjour,

...dans B1 tu mets =A1...la cellule B1 contiendra ce qui a été sélectionné dans la liste en A1...mais tu n'auras pas de liste en B1

Cordialement
 
Dernière édition:
Re : "Lier" des cellules

Bonjour,

Soit vous avez mal compris, soit je me suis mal exprimé 🙂
Le problème dans votre solution est si je change la valeur de la cellule B1 (qui doit etre une liste!).
La cellule A1 ne sera alors pas en accord avec la nouvelle valeur de B1
 
Re : "Lier" des cellules

En VBA, dans le code de la feuille :

Code:
Sub Worksheet_Change(ByVal Cible As Range)
Application.EnableEvents = False
If Not Intersect(Cible, Range("A1")) Is Nothing Then
    Range("B1").Value = Range("A1").Value
End If
If Not Intersect(Cible, Range("B1")) Is Nothing Then
    Range("A1").Value = Range("B1").Value
End If
Application.EnableEvents = True
End Sub



Cordialement
 
Dernière édition:
Re : "Lier" des cellules

bonjour,

ca semble parfait!
Mais autant je vois tres bien le concept des listes déroulantes, autant je n'arrive pas a ce résultat
Quelle est la démarche à suivre?
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
4
Affichages
949
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…