Compter le nombre de sortie des véhicules

Bonjour à tous,

je sollicite votre aide car je ne trouve pas la solution a mon problème.

Je suis un novice en vba et je souhaiterais créer un classeur ou je note et comptabilise les sortie des véhicules de l'entreprise.

Je vous joint une version très simplifiée de mon classeur original.

Sur la première feuille je note jour après jour le numéro des véhicules et l'heure de sortie, et sur la feuille 2, j'ai la liste de tout les véhicules.

Je souhaiterais juste avec un clic sur le bouton, comptabiliser le nombre de sortie de chaque véhicule par mois dans la feuille 2.

Je ne sais pas si je suis assez clair.

J'ai tenté avec cellsearch mais j'ai une erreur.

Je suis dispo pour répondre a vos questions au cas ou je ne me serais pas bien exprimé.

Cordialement

bonjour en0thur

Sub stats()
     Dim c0 As range, c As range, c1 As range, Mois

     Set c0 = Sheets("Feuil2").range("B1:B50")     'plage avec les numéros de vos voitures
     With Sheets("Feuil1")
          Mois = Month(.range("B2").Value2)  'mois de votre date = nombre de colonnes vers droite à partir de colonne B
          For Each c In .range("B5:B25").Cells
               If Len(c.Value) > 0 Then
                    Set c1 = c0.Find(c.Value, , lookat:=xlWhole)
                    If c1 Is Nothing Then
                         MsgBox "problème avec voiture " & c.Value
                    Else
                         c1.Offset(, Mois) = c1.Offset(, Mois) + 1
                    End If
               End If
          Next
     End With
End Sub

Merci Bart .

Excellent travail. J'était parti complétement à l'ouest.

Je m'attendais à voir un code beaucoup plus complexe. Je vois que j'ai encore beaucoup de travail

Encore merci