Récupérer la valeur selectionné d'une liste
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:
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
