"Mise à jour liste déroulante" dans Excel

Papou-net

XLDnaute Barbatruc

• 16 Janvier 2015

• #2

Re : "Mise à jour liste déroulante" dans Excel

Bonsoir yomage45,

Si tu supprimes une cellule dans la zones des agents, en décalant les cellules vers le haut, tu constateras que la liste déroulante sera mise à jour automatiquement.

Par contre, si tu désires effacer un nom dans la zone, la macro du fichier ci-joint procèdera à la mise à jour et au tri automatique de la liste.

A +

Cordialement.

 

Pièces jointes

• Classeur1 yomage45.xlsm

  18.8 KB · Affichages: 34

Vote positif 0 Vote négatif

chris

XLDnaute Barbatruc

• 16 Janvier 2015

• #3

Re : "Mise à jour liste déroulante" dans Excel

Bonjour à tous 🙂

Une autre solution consiste à déclarer la liste en tableau, à nommer l'unique colonne du tableau et utiliser ce nom comme source de la liste déroulante.
Pour supprimer une ligne quelconque du tableau : clic droit, supprimer lignes de tableau.
L'ajout, lui, est automatique et les déroulantes toujours à jour...

 

Pièces jointes

• ListeDer.xlsx

  11.9 KB · Affichages: 39

Vote positif 0 Vote négatif

Y

yomaje45

XLDnaute Nouveau

• 17 Janvier 2015

• #4

Re : "Mise à jour liste déroulante" dans Excel

Bonjour,

Merci à vous deux pour vos réponses mais elles ne correspondent pas à ce que je demandais à l'origine...
Je m'explique :

J'aimerai que le contenu de la cellule E3 disparaisse si je fais disparaitre son équivalent dans la liste en B.


La macro de papou-net bug ; la réponse de chris fonctionne mais ne correspond pas à ce que je souhaitai...

Merci tout de même pour vos contributions respectives.

J'attends toujours vos retours !

 

Vote positif 0 Vote négatif

chris

XLDnaute Barbatruc

• 17 Janvier 2015

• #5

Re : "Mise à jour liste déroulante" dans Excel

Bonjour

Le souci est qu'il ya plusieurs façon possibles d'effacer une ligne de la liste sans même sélectionner une cellule de cette liste.
La suppression n'est pas un événement.

Sauf astuce que je vois pas , il faudrait tester en permanence ce qui risque de ralentir Excel...

 

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 17 Janvier 2015

• #6

Re : "Mise à jour liste déroulante" dans Excel

salut

un exemple avec ce que j'ai cru comprendre et en accord avec Chris pour l'utilisation du Tableau😉.
Le tableau étant nommé Ta,

Code:

Private Sub Worksheet_Change(ByVal R As Range)
  If R.Address <> "$E$3" Then Exit Sub
  Dim L As Long
  Application.EnableEvents = 0
  L = [Ta].Find(R).Row
  [Ta].Rows(L - 1).Delete
  R = ""
  Application.EnableEvents = 1
End Sub

 

Pièces jointes

• TableauListeDeValidation.xlsm

  17.7 KB · Affichages: 37

Vote positif 0 Vote négatif

chris

XLDnaute Barbatruc

• 17 Janvier 2015

• #7

Re : "Mise à jour liste déroulante" dans Excel

Bonjour Si...

Ta solution fais l'inverse de ce que demande yomaje45...

 

Vote positif 0 Vote négatif