Bonjour à tous,


J'ai un souci de récupération de valeur sélectionnée à partir d'une liste.

Je sélectionne une plage de cellule et je lui affecte des listes.

Ces liste là sont crées à partir de l'onglet données >> validation des données >>> je choisi liste >> et je donne la source qui est dans mon cas "Categorie"

Pour faire celà automatiquement à l'ensemble de mes cellule j'ai enregistré une macro, j'ai récupéré le code et je l'ai adapté dans mon appli ça donne ça :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
 Application.Goto reference:="cellules"
                 ActiveCell.Offset(3, i).Select
 
               With Selection.Validation
                    .Delete
                    .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
                    xlBetween, Formula1:="=Categorie"
                    .IgnoreBlank = True
                    .InCellDropdown = True
                    .InputTitle = ""
                    .ErrorTitle = ""
                    .InputMessage = ""
                    .ErrorMessage = ""
                    .ShowInput = True
                    .ShowError = True
                End With
Actuellement je recherche a récupérer les valeurs selectionnées dans chaque cellule mais je ne vois pas comment je pourrais le faire;

Avez vous une idée ?

Merci