Discussion :

[glogla]

Bonjour,

J'ai un petit pb, mais je pense que ça ne doit pas être très difficile

j'utilise un filtre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Rows("1:1").Select
Selection.AutoFilter
Selection.AutoFilter Field:=10, Criteria1:="070"

Comment identifier le cas où je n'ai pas de résultat (aucune ligne avec la valeur 070 dans la colonne 10)?
Merci pour votre aide

[tirex28]

Bonjour,

Une solution parmi d'autres:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Dim x As Long
x = WorksheetFunction.Subtotal(3, Range("J2:J1000"))
MsgBox x

Adapter la référence de la plage, sans inclure la ligne de titre.

Cordialement,

Manu/