Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Résultats sur tableau

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion zeltron24
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire

zeltron24

XLDnaute Impliqué
Bonsoir le Forum,
Je souhaiterai si possible perfectionner mon fichier afin d'obtenir avec des options dans un userform,(Voir Fichier joint) le choix de trouver 3 ou 4 ou 5 voir 6 bons numéros. Ainsi l'idée m'est venue de vérifier mes grilles de LOTO avec les trirages réalisées. Ceci depuis 1976 date de la mise en place du jeu.

J'ai regardé un peu partout sans trouver de solutions qui me convienne.
Merci à vous de m'aider dans cette difficile tache
Cordialement
Zeltron24
 

Pièces jointes

Trier par date Trier par votes
Re : Résultats sur tableau

Bonjour,

si j'ai bien compris, test ce code:

Code: 
Private Sub CommandButton1_Click()
With Sheets("Feuil1")
  For Lig = 2 To .[A2].End(xlDown).Row
    cpte = 0
    For j = 1 To 6
      Set trouve = .Rows(Lig).Find(Controls("T" & j).Value, LookIn:=xlValues, lookat:=xlWhole)
      If Not trouve Is Nothing Then cpte = cpte + 1
    Next
    nbre = Switch(Opt3, 3, Opt4, 4, Opt5, 5, Opt6, 6)
    If cpte >= nbre Then
      MsgBox "La séquence se trouve à la ligne " & Lig
      Exit Sub
    End If
  Next
End With
End Sub
 
Vote positif 0 Vote négatif
Re : Résultats sur tableau

Bonsoir Skoobi,

Merci tout d'abord de te pencher sur mon problème.
Je souhaiterai si possible me servir des boutons options dans l'userForm.
Ainsi si je coche l'option 3 cela me donne que 3 chiffres à mettre dans les cases T1 T2 T3.
La recherche se ferait donc sur trois chiffres dans le tableau parmi les 6 des rangées 2 à 6. Si trouvé on donne la rangée.
Si pas trouvé on affiche un mgbox
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Z
  • Question Question
Forcer l'ouverture sur un feuille sans workbook_open
Réponses
12
Affichages
5 K
zorglubxp
Z
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…