à quoi sert le boolean ici ?

Fermé
120Watts Messages postés 10 Date d'inscription vendredi 25 mars 2022 Statut Membre Dernière intervention 9 avril 2022 - 25 mars 2022 à 12:05
 Utilisateur anonyme - 25 mars 2022 à 12:31
Bonjour,
voici une super macro générique fait par Frenchie83, que je remercie au passage. Une question de compréhension pour qu'on puisse progresser, quel rôle joue le boolean "NomTraite" dans la Macro et comment le lien s'opère-t-il entre "Nom" et "NomTraite" à la 8è ligne de code après les déclarations des variables. Merci d'avance pour les explications !
Le message de base date du 6 mai 2019 - Copie valeur cellule si condition remplie

Sub Restit()
    Dim DerLig As Long, DerCol As Long, Lig As Long, Col As Long
    Dim NomTraite As Boolean
    Dim l As Long, c As Long
    
    Application.ScreenUpdating = False
    DerLig = [A1000].End(xlUp).Row
    DerCol = [A1].End(xlToRight).Column
    Lig = 13 'ligne de départ du tableau de la collecte
    Col = 5 'Colonne de départ du tableau de la collecte
    For c = 2 To DerCol
        Nom = Cells(1, c)
        NomTraite = False
        For l = 2 To DerLig
            If Cells(l, c) = "x" Then
                If NomTraite = False Then Cells(Lig, Col) = Nom
                Cells(Lig, Col + 1) = Cells(l, "A")
                NomTraite = True
                Lig = Lig + 1
            End If
        Next l
    Next c


Configuration: Windows / Firefox 78.0

3 réponses

Utilisateur anonyme
Modifié le 25 mars 2022 à 12:17
Bonjour
Dim NomTraite As Boolean sert à définir la "variable" NomTraite qui sera que Vrai ou Faux.
On change cette valeur en ligne 13 ou 18 en fonction de l'action réalisée
Et si NomTraite est à Faux en ligne 16, on effectue le Then de la ligne 16
A+
___________
Si la réponse vous a aidé, un petit clic sur le pouce vers le haut, c'est top... Résolu c'est parfait.
Que celui qui n'a jamais ouvert un manuel utilisateur me jette la 1ère souris ;-)
1
120Watts Messages postés 10 Date d'inscription vendredi 25 mars 2022 Statut Membre Dernière intervention 9 avril 2022 2
25 mars 2022 à 12:28
Bonjour Merci pour les renseignements. Je vais jouer avec les True et False dans la macro pour voir concrètement comment se fait la bascule.
0
Utilisateur anonyme
Modifié le 25 mars 2022 à 12:32
Bonjour
Ce qui signifie que votre soucis est résolu ?
Si c'est le cas, n'oubliez pas de le faire, les 3 ... dans votre 1er post.
A+
0

Discussions similaires