lerogertroutman
XLDnaute Junior
Bonjour,
je souhaite comptabiliser les feuilles de mon document qui contiennent le mot "Partie", sachant qu'elle s'appellent Partie 1, Partie 2, etc.
Je débute en vba, et mon code ne fonctionne pas...
Une idée ?
Est-il possible d'utiliser .count ici ? J'ai essayé, mais sans succès...
Le Roger
je souhaite comptabiliser les feuilles de mon document qui contiennent le mot "Partie", sachant qu'elle s'appellent Partie 1, Partie 2, etc.
Je débute en vba, et mon code ne fonctionne pas...
Code:
Sub compterOngletsPartie()
Dim x As Integer
Dim j As Integer
Dim s As String
j = 0
For Each Worksheet In Worksheets
If Worksheet.Name = ("Partie*") Then
j = j + 1
Else
j = j - 1
End If
Next
If j > 1 Then
s = "s"
Else
s = ""
End If
MsgBox "Il y a " & j & " feuille" & s & " CIP"
End Sub
Une idée ?
Est-il possible d'utiliser .count ici ? J'ai essayé, mais sans succès...
Le Roger