Bonjour,
Je tourne en rond depuis plusieurs jours alors peut être que vous auriez une solution.
Je souhaite que lorsque je sélectionne un nom chargé dans ma combobox, celui ci soit choisi pour activer un filtre dans ma feuille "Suivi", colonne "N".
Je débute donc une solution clef en main serait idéal.
Merci de votre aide!
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
18
19
20
21
22
23
24
25
26
27
28
29
30 'Chargement du menu deroulant Private Sub UserForm_Initialize() Dim i As Integer i = 2 Do While Worksheets("Organisation").Cells(i, 1) <> "" ComboBox1.AddItem Worksheets("Organisation").Cells(i, 1) i = i + 1 Loop End Sub Private Sub CommandButton1_Click() Dim nom As String 'la variable nom prend pour valeur le nom choisi dans la liste du combobox1 nom = ComboBox1.Text 'Suppression des filtres éventuels With Worksheets("Suivi PV") If .FilterMode = True Then .ShowAllData End With 'Filtrer sur le nom dans la colonne N Worksheets("Suivi PV").Range("N4").AutoFilter Field:=1, Criteria1:="nom" Unload Me End Sub
Partager