J'ai une macro comme ceci:
______________________________________________
For i = 14 To 213 Step 4
If Range("F" & i) = " " Or Range("F" & i) = 0 Then
Range("F" & i, "F" & i + 3).EntireRow.Hidden = True
End If
Next i
End Sub
______________________________________________
Comment je pourrais lui ajouter la condition suivante:
à tous les 4 lignes j'ai des
R
C
A
R - C
R - A
C - A
R - C - A
(vide)
Ils apparaissent dans la colonne "G" comme G14, G18,G22 etc...jusqu'à G210
Voici la condition supplémentaire:
Même s'il y a une données dans la colonne "I", ne pas faire apparaitre les
"R" et les (vide)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
poy-poy
Bonjour Erico,
tu peux faire une deuxième boucle dessus pour les masquer ou reprendre la première et calculer quand i est un multiple de 4 (avec mod et prendre le reste = 0).
For k = 0 to 50 if cells (k*4+ 14,7) = "R" or cells(k*4+14,7) = "" then cells(k*4,1).entirerow.hidden = true end if next k
Cordialement Benjamin
J'ai une macro comme ceci: ______________________________________________ For i = 14 To 213 Step 4 If Range("F" & i) = " " Or Range("F" & i) = 0 Then Range("F" & i, "F" & i + 3).EntireRow.Hidden = True End If Next i End Sub ______________________________________________
Comment je pourrais lui ajouter la condition suivante:
à tous les 4 lignes j'ai des
R C A R - C R - A C - A R - C - A
(vide)
Ils apparaissent dans la colonne "G" comme G14, G18,G22 etc...jusqu'à G210
Voici la condition supplémentaire: Même s'il y a une données dans la colonne "I", ne pas faire apparaitre les "R" et les (vide)
Merci
Bonjour Erico,
tu peux faire une deuxième boucle dessus pour les masquer ou reprendre la
première et calculer quand i est un multiple de 4 (avec mod et prendre le
reste = 0).
For k = 0 to 50
if cells (k*4+ 14,7) = "R" or cells(k*4+14,7) = "" then
cells(k*4,1).entirerow.hidden = true
end if
next k
Cordialement
Benjamin
J'ai une macro comme ceci:
______________________________________________
For i = 14 To 213 Step 4
If Range("F" & i) = " " Or Range("F" & i) = 0 Then
Range("F" & i, "F" & i + 3).EntireRow.Hidden = True
End If
Next i
End Sub
______________________________________________
Comment je pourrais lui ajouter la condition suivante:
à tous les 4 lignes j'ai des
R
C
A
R - C
R - A
C - A
R - C - A
(vide)
Ils apparaissent dans la colonne "G" comme G14, G18,G22 etc...jusqu'à G210
Voici la condition supplémentaire:
Même s'il y a une données dans la colonne "I", ne pas faire apparaitre les
"R" et les (vide)
tu peux faire une deuxième boucle dessus pour les masquer ou reprendre la première et calculer quand i est un multiple de 4 (avec mod et prendre le reste = 0).
For k = 0 to 50 if cells (k*4+ 14,7) = "R" or cells(k*4+14,7) = "" then cells(k*4,1).entirerow.hidden = true end if next k
Cordialement Benjamin
J'ai une macro comme ceci: ______________________________________________ For i = 14 To 213 Step 4 If Range("F" & i) = " " Or Range("F" & i) = 0 Then Range("F" & i, "F" & i + 3).EntireRow.Hidden = True End If Next i End Sub ______________________________________________
Comment je pourrais lui ajouter la condition suivante:
à tous les 4 lignes j'ai des
R C A R - C R - A C - A R - C - A
(vide)
Ils apparaissent dans la colonne "G" comme G14, G18,G22 etc...jusqu'à G210
Voici la condition supplémentaire: Même s'il y a une données dans la colonne "I", ne pas faire apparaitre les "R" et les (vide)
Merci
Érico
Comme ça?
For i = 14 To 213 Step 4 If Range("F" & i) = " " Or Range("F" & i) = 0 Then Range("F" & i, "F" & i + 3).EntireRow.Hidden = True End If Next i For k = 0 to 50 if cells (k*4+ 14,7) = "R" or cells(k*4+14,7) = "" then cells(k*4,1).entirerow.hidden = true end if next k
End Sub
"poy-poy" a écrit dans le message de news:
Bonjour Erico,
tu peux faire une deuxième boucle dessus pour les masquer ou reprendre la première et calculer quand i est un multiple de 4 (avec mod et prendre le reste = 0).
For k = 0 to 50 if cells (k*4+ 14,7) = "R" or cells(k*4+14,7) = "" then cells(k*4,1).entirerow.hidden = true end if next k
Cordialement Benjamin
J'ai une macro comme ceci: ______________________________________________ For i = 14 To 213 Step 4 If Range("F" & i) = " " Or Range("F" & i) = 0 Then Range("F" & i, "F" & i + 3).EntireRow.Hidden = True End If Next i End Sub ______________________________________________
Comment je pourrais lui ajouter la condition suivante:
à tous les 4 lignes j'ai des
R C A R - C R - A C - A R - C - A
(vide)
Ils apparaissent dans la colonne "G" comme G14, G18,G22 etc...jusqu'à G210
Voici la condition supplémentaire: Même s'il y a une données dans la colonne "I", ne pas faire apparaitre les
"R" et les (vide)
Merci
Comme ça?
For i = 14 To 213 Step 4
If Range("F" & i) = " " Or Range("F" & i) = 0 Then
Range("F" & i, "F" & i + 3).EntireRow.Hidden = True
End If
Next i
For k = 0 to 50
if cells (k*4+ 14,7) = "R" or cells(k*4+14,7) = "" then
cells(k*4,1).entirerow.hidden = true
end if
next k
End Sub
"poy-poy" <poypoy@discussions.microsoft.com> a écrit dans le message de
news:B2E39A4F-697A-48B8-B7D1-AB2B6D3E93F4@microsoft.com...
Bonjour Erico,
tu peux faire une deuxième boucle dessus pour les masquer ou reprendre la
première et calculer quand i est un multiple de 4 (avec mod et prendre le
reste = 0).
For k = 0 to 50
if cells (k*4+ 14,7) = "R" or cells(k*4+14,7) = "" then
cells(k*4,1).entirerow.hidden = true
end if
next k
Cordialement
Benjamin
J'ai une macro comme ceci:
______________________________________________
For i = 14 To 213 Step 4
If Range("F" & i) = " " Or Range("F" & i) = 0 Then
Range("F" & i, "F" & i + 3).EntireRow.Hidden = True
End If
Next i
End Sub
______________________________________________
Comment je pourrais lui ajouter la condition suivante:
à tous les 4 lignes j'ai des
R
C
A
R - C
R - A
C - A
R - C - A
(vide)
Ils apparaissent dans la colonne "G" comme G14, G18,G22 etc...jusqu'à
G210
Voici la condition supplémentaire:
Même s'il y a une données dans la colonne "I", ne pas faire apparaitre
les
For i = 14 To 213 Step 4 If Range("F" & i) = " " Or Range("F" & i) = 0 Then Range("F" & i, "F" & i + 3).EntireRow.Hidden = True End If Next i For k = 0 to 50 if cells (k*4+ 14,7) = "R" or cells(k*4+14,7) = "" then cells(k*4,1).entirerow.hidden = true end if next k
End Sub
"poy-poy" a écrit dans le message de news:
Bonjour Erico,
tu peux faire une deuxième boucle dessus pour les masquer ou reprendre la première et calculer quand i est un multiple de 4 (avec mod et prendre le reste = 0).
For k = 0 to 50 if cells (k*4+ 14,7) = "R" or cells(k*4+14,7) = "" then cells(k*4,1).entirerow.hidden = true end if next k
Cordialement Benjamin
J'ai une macro comme ceci: ______________________________________________ For i = 14 To 213 Step 4 If Range("F" & i) = " " Or Range("F" & i) = 0 Then Range("F" & i, "F" & i + 3).EntireRow.Hidden = True End If Next i End Sub ______________________________________________
Comment je pourrais lui ajouter la condition suivante:
à tous les 4 lignes j'ai des
R C A R - C R - A C - A R - C - A
(vide)
Ils apparaissent dans la colonne "G" comme G14, G18,G22 etc...jusqu'à G210
Voici la condition supplémentaire: Même s'il y a une données dans la colonne "I", ne pas faire apparaitre les
"R" et les (vide)
Merci
Érico
ça ne fonctionne pas.
Oublie pas, mes "R" sont dans la colonne "G" "Érico" a écrit dans le message de news:
Comme ça?
For i = 14 To 213 Step 4 If Range("F" & i) = " " Or Range("F" & i) = 0 Then Range("F" & i, "F" & i + 3).EntireRow.Hidden = True End If Next i For k = 0 to 50 if cells (k*4+ 14,7) = "R" or cells(k*4+14,7) = "" then cells(k*4,1).entirerow.hidden = true end if next k
End Sub
"poy-poy" a écrit dans le message de news:
Bonjour Erico,
tu peux faire une deuxième boucle dessus pour les masquer ou reprendre la
première et calculer quand i est un multiple de 4 (avec mod et prendre le
reste = 0).
For k = 0 to 50 if cells (k*4+ 14,7) = "R" or cells(k*4+14,7) = "" then cells(k*4,1).entirerow.hidden = true end if next k
Cordialement Benjamin
J'ai une macro comme ceci: ______________________________________________ For i = 14 To 213 Step 4 If Range("F" & i) = " " Or Range("F" & i) = 0 Then Range("F" & i, "F" & i + 3).EntireRow.Hidden = True End If Next i End Sub ______________________________________________
Comment je pourrais lui ajouter la condition suivante:
à tous les 4 lignes j'ai des
R C A R - C R - A C - A R - C - A
(vide)
Ils apparaissent dans la colonne "G" comme G14, G18,G22 etc...jusqu'à G210
Voici la condition supplémentaire: Même s'il y a une données dans la colonne "I", ne pas faire apparaitre les
"R" et les (vide)
Merci
ça ne fonctionne pas.
Oublie pas, mes "R" sont dans la colonne "G"
"Érico" <hahaha@videotron.ca> a écrit dans le message de
news:uPKfp56BFHA.4072@tk2msftngp13.phx.gbl...
Comme ça?
For i = 14 To 213 Step 4
If Range("F" & i) = " " Or Range("F" & i) = 0 Then
Range("F" & i, "F" & i + 3).EntireRow.Hidden = True
End If
Next i
For k = 0 to 50
if cells (k*4+ 14,7) = "R" or cells(k*4+14,7) = "" then
cells(k*4,1).entirerow.hidden = true
end if
next k
End Sub
"poy-poy" <poypoy@discussions.microsoft.com> a écrit dans le message de
news:B2E39A4F-697A-48B8-B7D1-AB2B6D3E93F4@microsoft.com...
Bonjour Erico,
tu peux faire une deuxième boucle dessus pour les masquer ou reprendre
la
première et calculer quand i est un multiple de 4 (avec mod et prendre
le
reste = 0).
For k = 0 to 50
if cells (k*4+ 14,7) = "R" or cells(k*4+14,7) = "" then
cells(k*4,1).entirerow.hidden = true
end if
next k
Cordialement
Benjamin
J'ai une macro comme ceci:
______________________________________________
For i = 14 To 213 Step 4
If Range("F" & i) = " " Or Range("F" & i) = 0 Then
Range("F" & i, "F" & i + 3).EntireRow.Hidden = True
End If
Next i
End Sub
______________________________________________
Comment je pourrais lui ajouter la condition suivante:
à tous les 4 lignes j'ai des
R
C
A
R - C
R - A
C - A
R - C - A
(vide)
Ils apparaissent dans la colonne "G" comme G14, G18,G22 etc...jusqu'à
G210
Voici la condition supplémentaire:
Même s'il y a une données dans la colonne "I", ne pas faire apparaitre
les
Oublie pas, mes "R" sont dans la colonne "G" "Érico" a écrit dans le message de news:
Comme ça?
For i = 14 To 213 Step 4 If Range("F" & i) = " " Or Range("F" & i) = 0 Then Range("F" & i, "F" & i + 3).EntireRow.Hidden = True End If Next i For k = 0 to 50 if cells (k*4+ 14,7) = "R" or cells(k*4+14,7) = "" then cells(k*4,1).entirerow.hidden = true end if next k
End Sub
"poy-poy" a écrit dans le message de news:
Bonjour Erico,
tu peux faire une deuxième boucle dessus pour les masquer ou reprendre la
première et calculer quand i est un multiple de 4 (avec mod et prendre le
reste = 0).
For k = 0 to 50 if cells (k*4+ 14,7) = "R" or cells(k*4+14,7) = "" then cells(k*4,1).entirerow.hidden = true end if next k
Cordialement Benjamin
J'ai une macro comme ceci: ______________________________________________ For i = 14 To 213 Step 4 If Range("F" & i) = " " Or Range("F" & i) = 0 Then Range("F" & i, "F" & i + 3).EntireRow.Hidden = True End If Next i End Sub ______________________________________________
Comment je pourrais lui ajouter la condition suivante:
à tous les 4 lignes j'ai des
R C A R - C R - A C - A R - C - A
(vide)
Ils apparaissent dans la colonne "G" comme G14, G18,G22 etc...jusqu'à G210
Voici la condition supplémentaire: Même s'il y a une données dans la colonne "I", ne pas faire apparaitre les
