XL 2016 Userform liste de choix multiples, modifier une info

[Micka52]

Bonjour à tous,

Je reviens à nouveau vers vous car j'ai un projet qui me bloque complètement.

Je vous explique ce que je souhaite réaliser.
A l'aide un userforn dans la liste de gauche je veux ma colonne A (N° unique du récipient) de la feuille BD.
Sélectionner de multiples récipients et les copier dans la liste de droite a l'aide du bouton entre les deux listes.
Dans le ComboBox1 on sélectionne le site d'arrivée (localisation).
Quand je clic sur Valider je souhaite que les récipients sélectionnés et leur localisation (colonne C) mis à jour avec le nouveau site d'arrivé dans la feuille BD.

J’espère mettre fait comprendre.

Merci pour votre aide !

 

[BOISGONTIER]

Bonjour,

Exemple:

http://boisgontierjacques.free.fr/fichiers/Formulaire/FormTransfert2colonnesMultiSelectionSimple.xls

Boisgontier

 

[Bebere]

bonjour
une autre
fait ajout de lignes, peut être que tu veux modifier une ligne

 

[Micka52]

Bonjour,

Boisgontier, merci pour cette réponse rapide, j'essaie de comprendre pour avoir le résultat que je souhaite mais ça dépasse de loin mes compétences.

Bebere également merci pour ton travail rapide, j'avance à grands pas mais je veux que la localisation soit modifiée dans le tableau BD et non que cela me crée une nouvelle ligne.

Merci pour vaux recherche !

 

[Bebere]

bonjour
une autre version avec modification de ligne

 

[Micka52]

Bonjour,

Merci pour ta réponse.
Grâce à votre aide je suis arrivée à un résultat qui me plait.
Il y a la fonction la plus importante que je n'arrive pas à réaliser.
Quand je valide les récipients sélectionnés à droite ont leurs localisation remplacée par la nouvelle.

Merci d'avance pour votre aide !

Micka

 

[Bebere]

Bonjour
une autre version

 

[Micka52]

Bonjour Bebere,

Merci pour l'aide que tu m'apportes mais je ne dois pas être claire dans le résultat que je souhait atteindre.
Je n'arrive pas à comprendre ton travail (ça dépasse mes compétences) pour que j'essaie de l'ajuster.

Quand je valide les récipients sélectionnés à droite ont leurs localisations remplacée par la nouvelle qui vient du Conbobox.
Chaque récipient a ça propre localisation mis à jour.

 

[Bebere]

bonjour
Micka regarde cette version compare dest avec cellules colonne E et change cellules colonne C
peut être que c"est moi qui suit dur de la comprenure😉

 

[Micka52]

Bonjour,

Tu as fait un super boulot. merci beaucoup.
Je ne comprends pas tout

 

[Micka52]

Bonjour,
Je ne comprends pas en ajoutant ma vrai BDD dans le tableau il ne fonctionne pas.
J'ai bien modifié la source liste.

Merci d'avance pour votre aide !

 

[ChTi160]

Bonjour Micka52
Bonjour le Fil (Bebere) ,le Forum
je ne sais pas si j'ai bien compris mais !
en attendant Bebere Lol
Tu as :

If Mid(Feuil3.Range("E" & L), 8)

on teste la colonne "E"
ne faut t'il pas !

If Mid(Feuil3.Range("A" & L), 8)

Ici On teste la colonne "A"
jean marie

 

[Micka52]

Bonjour ChTi60
J'ai essayér avec la colonne A mais cela ne fonctionne pas.

 

[ChTi160]

Bonjour Micka52
Bonjour le Fil ,le Forum
Sans explication sur le comment et le pourquoi , je ne peux rien Lol
mets un exemple peut être !
bonne journée
jean marie

 

[Bebere]

bonjour à tous
Micka,Chti il suffit de comparer colonne A avec item de Dest

 If Feuil3.Range("A" & L) = Me.Dest.List(I) Then