à quoi sert le boolean ici ?
120Watts
Messages postés
12
Statut
Membre
-
Utilisateur anonyme -
Utilisateur anonyme -
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
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
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 ;-)
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 ;-)