Discussion :

[Valentino46]

Bonjour,

Je me permets de poser mes requêtes en espérant trouver un peu d’aide pour mon projet.
Voilà, je débute dans le VBA et j’aimerais concevoir un programme de création de plan de validation.

La base :
J’ai donc un classeur EXCEL avec en première page une matrice contenant 6 colonnes et 55 lignes.
Chaque ligne dépend donc d’une colonne dans laquelle il y a un 1 ou un 0 suivant que la fiche de validation est pourvue du paramètre ou non.
Chaque ligne représente une feuille EXCEL donc une fiche de validation.

Je souhaiterais donc, à l’aide de macro, réaliser un bouton qui permet de cocher les paramètres souhaité, donc les colonnes. Et de crée un nouveau classeur avec les fiches voulues.

Autrement dit lorsque je coche les cases cela créé une suite de 1 et de 0 (6 au total) qui sont comparé aux 55 lignes et ensuite mon programme m’enregistre dans un nouveau classeur les fiches correspondantes aux lignes.

J’espère avoir été clair jusqu’à là.

Ce que j’ai fait :

J’ai déjà deux fonction pour extraire les colonnes et les mettre sur ma fenêtre de choix multiple ainsi que pour proposer à l’utilisateur d’enregistré le nouveau classeur. Cependant, j’ignore comment comparer mes lignes a « ma consigne » ou plutôt au choix fait lorsque l’on a coché les cases.
J’aimerais retranscrire les « coché » où « non-coché » en une suite de 0 et de 1 pour comparer.


Je suis prêts à redire les choses si ce n’est pas clair car j’aimerais vraiment finir ce projet rapidement et étant bloqué je ne souhaite pas laissé d’ambiguïté à la compréhension.


Merci de votre aide.



Alexis

[KekeStreet]

Bonjour,

c'est pas trop tellement clair à mes yeux donc si je fais fausse route, précises : si j'ai bien compris tu as 55 fiches qui contiennent des paramètres parmis 6 possibles.

Et tu veux récupérer ces fiches en fonction d'une combinaison choisie des 6 paramètres ?

Les fiches que tu récupèrent, elle doivent avoir exactement la même configuration de paramètres ou elle doivent avoir au moins ceux qui sont cochés ?

Ce n'est pas très compliqué, faut juste que l'on sache plus précisément ou tu veux aller pour pouvoir t'indiquer. Je regarde ce que je peut faire en attendant

Si c'est exactement les mêmes paramètres, je vois bien un petite userform avec 6 checkbox et un bouton OK contenant ce genre de code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub CommandButtonOk_Click()
    Dim parametres(6) As Byte
 
    If Me.CheckBox1.Value = True Then parametres(1) = 1 Else parametres(1) = 0
    If Me.CheckBox2.Value = True Then parametres(2) = 1 Else parametres(2) = 0
    If Me.CheckBox3.Value = True Then parametres(3) = 1 Else parametres(3) = 0
    If Me.CheckBox4.Value = True Then parametres(4) = 1 Else parametres(4) = 0
    If Me.CheckBox5.Value = True Then parametres(5) = 1 Else parametres(5) = 0
    If Me.CheckBox6.Value = True Then parametres(6) = 1 Else parametres(6) = 0
 
    For r = 1 To 55
        If Array(Cells(r, 1), Cells(r, 2), Cells(r, 3), Cells(r, 4), Cells(r, 5), Cells(r, 6)) = parametres Then
            'Cette ligne a des paramètres qui correspondent
        End If
 
End Sub

Je pense que l'on peut boucler sur les checkbox pour réduire, mais je ne sais pas comment il faut faire, ça concerne les collections je crois. Je suis pas calé la dedans.

[Valentino46]

Excuse moi de ne pas avoir été très clair.

Je reformule rapidement.

En gros j'appuie sur un bouton, une fenêter s'ouvre et propose des cases à cocher.
Cela constitue donc une suite de 0 et de 1 que l'on compare à chaque lignes (Donc à chaque feuille car une ligne = une feuille Excel) et on enregistre toutes les suites correspondantes a la consigne dans un nouveau classeur.

J'espère que cela aidera la compréhension

Ce que je n'arrive pas a faire c'est faire correspondre les choix (donc les cases cochées ou non) a une suite de zéro et ensuite la comparer à chaque lignes.

Serait-ce mieux?

Merci beaucoup en tout cas

[KekeStreet]

Pas de soucis, c'est simplement pas toujours évident de comprendre un problème résumé à quelques lignes.

Le fichier joint devrait faire l'affaire à peu près (mis à part que je ne fais pas de nouveau classeur, mais cette étape tu sais déjà comment faire je crois ?), après il faut que tu adaptes à ton fichier mais ça te montre un peu comment faire.

Le code fonctionne mieux que le brouillon miteux de ce matin mais je pense qu'il peut encore beaucoup être amélioré.

dis moi déjà si ça corresponds mieux à ce que tu recherches.

[Valentino46]

Oui puis parfois lorsque l'on est dans son travail c'est pas facile de prendre du recul et d'expliquer. On se comprend mais de là a être très explicite...


Euh hé bien en tout cas merci beaucoup. Ca m'aide déjà pas mal. Il me reste encore deux trois petites choses à voir mais visiblement c'est une bonne piste.


Je ne mets pas "résolu" car je reviendrais peut-êter avec de nouvelles questions

Merci pour le tuyau en tout cas, c'est super sympa.