manuseverine
XLDnaute Nouveau
bonjour à tous,
j'ai un dossier dans lequel j'ai le code suivant :
j'essaie en fait de faire un tri de mes clients par département mais quand je clique sur le bouton pour activer la recherche, il me demande bien de saisir un département mais quand je valide j'ai le message : "erreur d'execution 91, variable objet ou variable de bloc with non définie"
J'ai beau chercher dans l'aide je ne trouve pas.
Merci à ceux qui essaieront de m'aider.
j'ai un dossier dans lequel j'ai le code suivant :
Code:
Private Sub CommandButton1_Click()
Dim Dpt As String
Dpt = InputBox("Entrez n° département") & "*"
With Sheets("Clients")
With .Range("A2")
.AutoFilter
.AutoFilter Field:=5, Criteria1:=Dpt
MsgBox Feuil1.AutoFilter.Range.Columns(1).SpecialCells(xlCellTypeVisible).Cells.Count
End With
End With
End Sub
j'essaie en fait de faire un tri de mes clients par département mais quand je clique sur le bouton pour activer la recherche, il me demande bien de saisir un département mais quand je valide j'ai le message : "erreur d'execution 91, variable objet ou variable de bloc with non définie"
J'ai beau chercher dans l'aide je ne trouve pas.
Merci à ceux qui essaieront de m'aider.