OVH Cloud OVH Cloud

données validation

13 réponses
Avatar
daniel
Bonjour,
J'ai 2 onglets, sur le 1er une liste avec données validation qui reprend les
noms de groupes (ex. A,B,C,D,E,F) et sur le 2e une liste qui dépend du
groupe sélectionné dans l'onglet 1, ( choix onglet 1 groupe A, liste onglet
2 = A1,A2,A3,A4, Choix B = B1,B2,etc..). Mon problème est que lorsque je
change le groupe dans l'onglet 1, la liste reste avec la dernière valeur
faite dans l'onglet 2, alors que je souhaiterais que la liste s'actualise en
indiquant la 1ère valeur de la nouvelle liste. (sélection onglet 2 sur B4,
modification du groupe onglet 1 sur A, la nouvelle valeur onglet 2 devrait
être A1 et non pas rester sur B4)
J'ai essayé d'être le plus claire possible.
Merci par avance et bon week-end.

10 réponses

1 2
Avatar
Antoine
Bonjour,

je pense que tu devrais trouver la réponse à tes question dans l'excellent
fichier de JB sur les validations de listes d'excelabo en cliquant ici :

http://www.excelabo.net/moteurs/compteclic.php?nom=jb-validation

et en allant sur les onglets "ValidListeCascade..."

Cordialement

Antoine

"daniel" a écrit dans le message de news:
e004yhz%
Bonjour,
J'ai 2 onglets, sur le 1er une liste avec données validation qui reprend
les noms de groupes (ex. A,B,C,D,E,F) et sur le 2e une liste qui dépend du
groupe sélectionné dans l'onglet 1, ( choix onglet 1 groupe A, liste
onglet 2 = A1,A2,A3,A4, Choix B = B1,B2,etc..). Mon problème est que
lorsque je change le groupe dans l'onglet 1, la liste reste avec la
dernière valeur faite dans l'onglet 2, alors que je souhaiterais que la
liste s'actualise en indiquant la 1ère valeur de la nouvelle liste.
(sélection onglet 2 sur B4, modification du groupe onglet 1 sur A, la
nouvelle valeur onglet 2 devrait être A1 et non pas rester sur B4)
J'ai essayé d'être le plus claire possible.
Merci par avance et bon week-end.



Avatar
daniel
Bonjour,
J'étais dans le fichier (excellent il est vrai), mais je ne trouve pas mon
bonheur, pour l'instant....
Il y a tellement de choses à voir que je m'égare vers d'autres astuces....
Si tu trouves directement le bon onglet, dis le moi.
Bon journée.
Avatar
Antoine
Peux-tu mettre ton ficier en Cjoint ?

Antoine

"daniel" a écrit dans le message de news:
uLedK8z%
Bonjour,
J'étais dans le fichier (excellent il est vrai), mais je ne trouve pas mon
bonheur, pour l'instant....
Il y a tellement de choses à voir que je m'égare vers d'autres astuces....
Si tu trouves directement le bon onglet, dis le moi.
Bon journée.



Avatar
daniel
re,
mon fichier est trop gros, aussi, je colle une feuille de l'excellent
fichier de Jacques Boisgontier.
enfin j'aurais du coller l'onglet ListeCascadeSansNomsChamp2 qui est
vraiment super (je poursuis la découverte du fichier..)
dans mon 1er message, je précisais que les listes étaient sur des onglets
différents, car je pensais à du VBA et une macro évènementielle pour
l'actualisation de la liste dépendante.

http://cjoint.com/?kDlid0EFyW
Avatar
Antoine
La solution à laquelle je pense est une macro évenemntielle, du genre :

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Range("macellule de validation1"), Target) Is Nothing And
Target.Count = 1 Then
For Each c In Range("monchampdevalidation1")
If c.Value = Target.Value then ...
else
Target.Value = ...

à préciser

Cordialement

Antoine


"daniel" a écrit dans le message de news:
uLedK8z%
Bonjour,
J'étais dans le fichier (excellent il est vrai), mais je ne trouve pas mon
bonheur, pour l'instant....
Il y a tellement de choses à voir que je m'égare vers d'autres astuces....
Si tu trouves directement le bon onglet, dis le moi.
Bon journée.



Avatar
Antoine
Peut-être ce fichier de JB t'aidera-t-il ...

http://www.excelabo.net/moteurs/compteclic.php?nom=jb-worksheetchange

Antoine

"Antoine" a écrit dans le message de news:
uBSBvO0%
La solution à laquelle je pense est une macro évenemntielle, du genre :

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Range("macellule de validation1"), Target) Is Nothing And
Target.Count = 1 Then
For Each c In Range("monchampdevalidation1")
If c.Value = Target.Value then ...
else
Target.Value = ...

à préciser

Cordialement

Antoine


"daniel" a écrit dans le message de news:
uLedK8z%
Bonjour,
J'étais dans le fichier (excellent il est vrai), mais je ne trouve pas
mon bonheur, pour l'instant....
Il y a tellement de choses à voir que je m'égare vers d'autres
astuces....
Si tu trouves directement le bon onglet, dis le moi.
Bon journée.







Avatar
daniel
je vais revoir tout ça, mais ça va être dur pour moi.
sinon, une autre liste déroulante impressionnante sur le site de
bipbipcoyote que je vais essayer de comprendre.
merci et bon week-end.

http://cjoint.com/?kDlYI6eTQj

http://bipbipcoyote2000.site.voila.fr/index.html
Avatar
daniel
Re,
trop difficile pour moi, aussi, j'ai mis une formule qui cherche la valeur
voulue dans l'onglet 2 et avec Worksheet.activate, j'ai mis [D4] = [AI1],
cellule où se trouve ma formule rechercheh.
Bon week-end.
Avatar
JB
Bonjour,

Avec Données/Validation/Liste:

http://cjoint.com/?kDnp5tb3Sw

Menu1 1 en A2 - Menu2 en A5

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$2" Then
[A5] = Range(Target)(1)
End If
End Sub

Cordialement JB


Bonjour,
J'ai 2 onglets, sur le 1er une liste avec données validation qui repren d les
noms de groupes (ex. A,B,C,D,E,F) et sur le 2e une liste qui dépend du
groupe sélectionné dans l'onglet 1, ( choix onglet 1 groupe A, liste onglet
2 = A1,A2,A3,A4, Choix B = B1,B2,etc..). Mon problème est que lorsq ue je
change le groupe dans l'onglet 1, la liste reste avec la dernière valeur
faite dans l'onglet 2, alors que je souhaiterais que la liste s'actualise en
indiquant la 1ère valeur de la nouvelle liste. (sélection onglet 2 su r B4,
modification du groupe onglet 1 sur A, la nouvelle valeur onglet 2 devrait
être A1 et non pas rester sur B4)
J'ai essayé d'être le plus claire possible.
Merci par avance et bon week-end.


Avatar
daniel
Bonjour,
merci pour votre réponse et bravo pour vos fichiers exemples qui sont des
mines de renseignements.
Bon week-end.
1 2