Comptage voture Rallye

Bonjour à toutes et à tous,

2 Demandes d’aide

Voila, j’ai un fichier Excel qui me permet de gérer le contrôle des vérifications techniques des voitures de rallye

Ce fichier se compose de 3 feuilles

  1. Données ou je rentre, Pilote, copilote, voiture, groupe & classe

  2. Saisie ou je rentre les engagés par N° de voiture

  3. Totaux qui me donne le nombre de véhicules contrôlés + rapport imprimable

1er problème ;

Dans les rallyes la voiture N° 13 n’existe pas or, je suis confronté à une erreur de calcul, j’ai contourné cette erreur en mettant (+1) dans “Total Contrôlé”,
Mais je pense que vous allez trouver une solution à ce problème.

2ême demande
Y aurait t’il possibilité de récupérer sur le rapport les N° de voitures qui n’ont pas étaient contrôlés,
Je vous joint le fichier Excel
Je tiens à remercier les gens qui vont intervenir pour leur travail de soutien et leurs aides qui nous apportent.
Bonne journée
Patrice Jubré

Enregistrement Ronde lest.xlsm (775,4 Ko)

Bonjour,

  1. Pour autant que je comprenne, il n’y a pas besoin de faire +1 ?
  2. Ca dépend de ta version d’Excel. Avec Excel 2021 ou postérieure, essaie :
=FILTRE(Tableau12[N°];(Tableau12[CONTRÔLE]=FAUX)*(Tableau12[PILOTE]<>""))

Si tu as une version antérieure, dis-le.

Daniel

… Mais si effeectivement, tu veux compter le nombre de n° de voitures manquants, utilise :

=MAX(Tableau12[N°])-NBVAL(Tableau12[N°])

Daniel

Bonjour Daniel

J’utilise la version 365 d’Office
et je te remercie car la dernière formule que tu m’a donné fonctionne bien.

Par contre je suis obligé de mettre + 1 pour avoir un nombre correct de voitures contrôlées

car la voiture n° 13 n’existe pas, si je rajoute ce n° 13 la ça fonctionne
mille fois merci pour ton aide
Patrice

Pour tenir compte des n° de voiture manquants, en E4, mets :

=SOMME(B3:B8)+MAX(Tableau12[N°])-NBVAL(Tableau12[N°])

Daniel

1 « J'aime »

Bonjour Daniel
Cela fonctionne !
Sincèrement merci
Bon Dimanche à toi
Patrice

Bonjour Daniel
je me permet de t’ennuyer encore
2 petites choses

  1. j’ai un mauvais calcul des voitures contrôlées, j’ai une voiture (fantôme) avec ta formule dans E4

  2. La formule pour l’affichage du n° fonctionne très bien, mais lorsque aucune voiture n’est sélectionnée, j’ai toute la listes des voitures ce qui est normal, j’ai pensé mettre un bouton pour y mettre ta formule, mais je ne sais pas comment faire pour la transformer en VB ou macro, je suis vraiment nul en programmation, j’arrive à comprendre ce que fait la ligne de code mais impossible pour moi de la créer
    J’ai mis quelques voitures pour que tu puisses faire le test.
    Encore merci

Enregistrement St Jo.xlsm (778,0 Ko)

Bonjour,

La formule ne compte que les les infos de B3 à B8. Peut-être faut-il mettre :

=SOMME(B3:B10)+MAX(Tableau12[N°])-NBVAL(Tableau12[N°])
  1. Essaie :
Sub NonControles()
  Dim C As Range, Plage As Range, Ligne As Long
  With Sheets("Saisie")
    Ligne = Range("B:B").Find("*", , , xlPart, xlByRows, xlPrevious).Row
    Set Plage = .Range("H5:H" & Ligne)
  End With
  With Sheets("totaux")
    .[A13:A1000] = ""
    Ligne = 12
    For Each C In Plage
      If C = False Then
        Ligne = Ligne + 1
        .Cells(Ligne, 1) = C.Offset(, -7)
      End If
    Next C
  End With
End Sub

Daniel

Bonjour Daniel

Merci de ta rapidité

Le comptage des voitures marche très bien, je n’ai plus de voiture en trop

Par contre le module "NonControles"pour afficher les N° de voiture ne fonctionne pas

Si pas de voitures sélectionnées cela me marque 123456

Si toutes les voitures sélectionnées rien ne se passe

la formule « =FILTRE(Tableau12[N°];(Tableau12[CONTRÔLE]=FAUX)*(Tableau12[PILOTE]<>«  »)) » fonctionne bien
c’est pas grave, car une fois toutes les voitures seront pointées, il ne m’en restera pas beaucoup qui n’ont pas était contrôlées, en général, ça ne dépasse pas 6 ou 7 véhicules

encore merci

Patrice