Bonjour les forumiteux,
Malgré mes recherches, je n'ai pas réussi à trouver une solution pour définir le critère du filtrage des données par une formule.
Je souhaite filtrer une colonne comportant des références numériques par le premier chiffre de cette référence (1 par exemple) sans être contraint de rapatrier ce premier chiffre dans une autre colonne ou dans un tableau matriciel.
Je vous précise que ce filtrage est lié à un userform mais je ne pense pas que cela soit important.
L'élément "Criteria1:="1*" devrait être remplacé dans la théorie par une formule de type "LEFT(cellule,1)=(valeur d'une saisie dans une combobox).
Merci d'avance pour votre aide précieuse.
Malgré mes recherches, je n'ai pas réussi à trouver une solution pour définir le critère du filtrage des données par une formule.
Je souhaite filtrer une colonne comportant des références numériques par le premier chiffre de cette référence (1 par exemple) sans être contraint de rapatrier ce premier chiffre dans une autre colonne ou dans un tableau matriciel.
Je vous précise que ce filtrage est lié à un userform mais je ne pense pas que cela soit important.
VB:
Private Sub UserForm_Initialize()
Dim col As Integer
With Sheets("et2")
ListUT.List = .Range("B2:B33").Value
End With
With ActiveSheet
If .AutoFilterMode = False Then
Rows(1).AutoFilter
Else: If .FilterMode = True Then .ShowAllData
End If
End With
col = Rows(1).Find("Classo. ASG").Column
Selection.AutoFilter Field:=col, Criteria1:="1*"
End SubL'élément "Criteria1:="1*" devrait être remplacé dans la théorie par une formule de type "LEFT(cellule,1)=(valeur d'une saisie dans une combobox).
Merci d'avance pour votre aide précieuse.