Bonjour,
Quel code me permettrait de masquer automatiquement la ligne entière si les
cellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Bonjour,
Quel code me permettrait de masquer automatiquement la ligne entière si les
cellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Bonjour,
Quel code me permettrait de masquer automatiquement la ligne entière si les
cellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
cellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
cellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
cellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Bonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je mal?
Greg
si lescellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Bonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je mal?
Greg
si les
cellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Bonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je mal?
Greg
si lescellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
DanielBonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je
mal?
Greg
si lescellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
Daniel
Bonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je
mal?
Greg
si les
cellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
DanielBonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je
mal?
Greg
si lescellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Merci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules sont
le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il prenne en
compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" a écrit dans le message de
news:Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
DanielBonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je mal?
Greg
si lescellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Merci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules sont
le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il prenne en
compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" <dcolardelleZZZ@gmail.com> a écrit dans le message de
news:OixNVEsuKHA.4636@TK2MSFTNGP06.phx.gbl...
Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
Daniel
Bonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je mal?
Greg
si les
cellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Merci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules sont
le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il prenne en
compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" a écrit dans le message de
news:Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
DanielBonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je mal?
Greg
si lescellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Essaie :
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(txt, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
DanielMerci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules
sont le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il prenne
en compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" a écrit dans le message de
news:Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
DanielBonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je
mal?
Greg
si lescellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Essaie :
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(txt, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
Daniel
Merci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules
sont le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il prenne
en compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" <dcolardelleZZZ@gmail.com> a écrit dans le message de
news:OixNVEsuKHA.4636@TK2MSFTNGP06.phx.gbl...
Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
Daniel
Bonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je
mal?
Greg
si les
cellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Essaie :
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(txt, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
DanielMerci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules
sont le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il prenne
en compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" a écrit dans le message de
news:Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
DanielBonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je
mal?
Greg
si lescellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Il m'efface tout le vilain... cellule=0 ou pas...
"Daniel.C" a écrit dans le message de
news:Essaie :
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(txt, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
DanielMerci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules
sont le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il prenne
en compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" a écrit dans le message de
news:Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
DanielBonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je
mal?
Greg
si lescellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Il m'efface tout le vilain... cellule=0 ou pas...
"Daniel.C" <dcolardelleZZZ@gmail.com> a écrit dans le message de
news:erdCRcsuKHA.4464@TK2MSFTNGP04.phx.gbl...
Essaie :
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(txt, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
Daniel
Merci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules
sont le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il prenne
en compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" <dcolardelleZZZ@gmail.com> a écrit dans le message de
news:OixNVEsuKHA.4636@TK2MSFTNGP06.phx.gbl...
Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
Daniel
Bonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je
mal?
Greg
si les
cellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Il m'efface tout le vilain... cellule=0 ou pas...
"Daniel.C" a écrit dans le message de
news:Essaie :
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(txt, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
DanielMerci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules
sont le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il prenne
en compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" a écrit dans le message de
news:Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
DanielBonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je
mal?
Greg
si lescellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Au cas où, voici mon fichier d'essai: http://cjoint.com/?ddnrdL0NEl
"Greg" a écrit dans le message de
news:%Il m'efface tout le vilain... cellule=0 ou pas...
"Daniel.C" a écrit dans le message de
news:Essaie :
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(txt, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
DanielMerci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules
sont le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il prenne
en compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" a écrit dans le message de
news:Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
DanielBonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je
mal?
Greg
si lescellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Au cas où, voici mon fichier d'essai: http://cjoint.com/?ddnrdL0NEl
"Greg" <debutant@free.fr> a écrit dans le message de
news:%23iZHlosuKHA.3896@TK2MSFTNGP02.phx.gbl...
Il m'efface tout le vilain... cellule=0 ou pas...
"Daniel.C" <dcolardelleZZZ@gmail.com> a écrit dans le message de
news:erdCRcsuKHA.4464@TK2MSFTNGP04.phx.gbl...
Essaie :
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(txt, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
Daniel
Merci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules
sont le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il prenne
en compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" <dcolardelleZZZ@gmail.com> a écrit dans le message de
news:OixNVEsuKHA.4636@TK2MSFTNGP06.phx.gbl...
Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
Daniel
Bonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je
mal?
Greg
si les
cellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Au cas où, voici mon fichier d'essai: http://cjoint.com/?ddnrdL0NEl
"Greg" a écrit dans le message de
news:%Il m'efface tout le vilain... cellule=0 ou pas...
"Daniel.C" a écrit dans le message de
news:Essaie :
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(txt, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
DanielMerci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules
sont le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il prenne
en compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" a écrit dans le message de
news:Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
DanielBonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je
mal?
Greg
si lescellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(0, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
DanielAu cas où, voici mon fichier d'essai: http://cjoint.com/?ddnrdL0NEl
"Greg" a écrit dans le message de
news:%Il m'efface tout le vilain... cellule=0 ou pas...
"Daniel.C" a écrit dans le message de
news:Essaie :
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(txt, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
DanielMerci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules
sont le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il
prenne en compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" a écrit dans le message de
news:Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
DanielBonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y
prends-je mal?
Greg
si lescellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(0, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
Daniel
Au cas où, voici mon fichier d'essai: http://cjoint.com/?ddnrdL0NEl
"Greg" <debutant@free.fr> a écrit dans le message de
news:%23iZHlosuKHA.3896@TK2MSFTNGP02.phx.gbl...
Il m'efface tout le vilain... cellule=0 ou pas...
"Daniel.C" <dcolardelleZZZ@gmail.com> a écrit dans le message de
news:erdCRcsuKHA.4464@TK2MSFTNGP04.phx.gbl...
Essaie :
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(txt, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
Daniel
Merci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules
sont le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il
prenne en compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" <dcolardelleZZZ@gmail.com> a écrit dans le message de
news:OixNVEsuKHA.4636@TK2MSFTNGP06.phx.gbl...
Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
Daniel
Bonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y
prends-je mal?
Greg
si les
cellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(0, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
DanielAu cas où, voici mon fichier d'essai: http://cjoint.com/?ddnrdL0NEl
"Greg" a écrit dans le message de
news:%Il m'efface tout le vilain... cellule=0 ou pas...
"Daniel.C" a écrit dans le message de
news:Essaie :
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(txt, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
DanielMerci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules
sont le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il
prenne en compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" a écrit dans le message de
news:Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
DanielBonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y
prends-je mal?
Greg
si lescellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Désolé Daniel mais toutes les ligne se masquent, quelque soit le contenu...
même avec ce dernier code.
"Daniel.C" a écrit dans le message de
news:Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(0, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
DanielAu cas où, voici mon fichier d'essai: http://cjoint.com/?ddnrdL0NEl
"Greg" a écrit dans le message de
news:%Il m'efface tout le vilain... cellule=0 ou pas...
"Daniel.C" a écrit dans le message de
news:Essaie :
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(txt, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
DanielMerci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules
sont le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il prenne
en compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" a écrit dans le message de
news:Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
DanielBonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je
mal?
Greg
si lescellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Désolé Daniel mais toutes les ligne se masquent, quelque soit le contenu...
même avec ce dernier code.
"Daniel.C" <dcolardelleZZZ@gmail.com> a écrit dans le message de
news:OJzq17suKHA.3408@TK2MSFTNGP06.phx.gbl...
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(0, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
Daniel
Au cas où, voici mon fichier d'essai: http://cjoint.com/?ddnrdL0NEl
"Greg" <debutant@free.fr> a écrit dans le message de
news:%23iZHlosuKHA.3896@TK2MSFTNGP02.phx.gbl...
Il m'efface tout le vilain... cellule=0 ou pas...
"Daniel.C" <dcolardelleZZZ@gmail.com> a écrit dans le message de
news:erdCRcsuKHA.4464@TK2MSFTNGP04.phx.gbl...
Essaie :
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(txt, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
Daniel
Merci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules
sont le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il prenne
en compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" <dcolardelleZZZ@gmail.com> a écrit dans le message de
news:OixNVEsuKHA.4636@TK2MSFTNGP06.phx.gbl...
Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
Daniel
Bonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je
mal?
Greg
si les
cellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg
Désolé Daniel mais toutes les ligne se masquent, quelque soit le contenu...
même avec ce dernier code.
"Daniel.C" a écrit dans le message de
news:Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(0, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
DanielAu cas où, voici mon fichier d'essai: http://cjoint.com/?ddnrdL0NEl
"Greg" a écrit dans le message de
news:%Il m'efface tout le vilain... cellule=0 ou pas...
"Daniel.C" a écrit dans le message de
news:Essaie :
Sub test()
For ligne = 5 To 100
If Application.Max(Range(Cells(ligne, 2), Cells(ligne, 5))) = 0 Then
If IsError(Application.Match(txt, Range(Cells(ligne, 2), _
Cells(ligne, 5)), 0)) Then
Rows(ligne).Hidden = True
End If
End If
Next
End Sub
DanielMerci Daniel,
Ca fonctionne bien sur une cellule classique. Par contre, mes cellules
sont le résultat d'une formule qui fait référence à une autre feuille:
Exemple en A5:
=SI(Feuil1!A5=0;"";Feuil1!A5)
.... et là, ça ne marche pas. Peut-être aurais-je dû commencer par là.
Autre question: que faut-il écrire à côté de ligne= ? pour qu'il prenne
en compte de la ligne 5 à la ligne 100 par exemple?
Merci
Greg
"Daniel.C" a écrit dans le message de
news:Au temps pour moi :
Application.CountA
pas :
Applicaation.CountA
DanielBonjour Daniel et merci pour ta réponse,
Lorsque j'utilise ce code, il me répond "Objet requis". M'y prends-je
mal?
Greg
si lescellules sont vides entre la colonne 2 (B) et la colonne 5 (E)?
Merci à vous.
Greg