Bonjour,
J'ai créé un tableau ou j'ai mis en en-tête 1 comboBox dans chaque colonne pour filtrer le contenu des rangées. Je suis capables de remplir les combo box, mais pas d'appliquer le filtre. C'est-à-dire que quand je sélectionne une valeur du comboBox, elle s'affiche dedans mais le reste du tableau n'est pas changée. Aussi j'aimerais savoir comment faire pour afficher une valeur par défaut dans le combo box (je veux qu'il soit écrit "Select a port"). Voici mon code:
Merci !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Sub CB_loadPort_Change() With Sheets("calculs") premierPort = .Range("AA1").Address dernierPort = .Range(premierPort).End(xlDown).Address ports = .Range(premierPort & ":" & dernierPort) End With With ActiveSheet.CB_loadPort For Each portName In ports .AddItem portName Next portName .Style = fmStyleDropDownList .AutoSize = False End With End Sub
Partager