Comment masqué les lignes automatiquement lorsque les cellules sont vides
Comme exemple:
Si la cellule D16 est vide, masquer les lignes 16,17,18 et 19
Si la cellule D20 est vide, masquer les lignes 20,21,22 et 23
Si la cellule D24 est vide, masquer les lignes 24,25,26 et 27
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
Philippe.R
Bonsoir, Une base avec :
Sub masquesi() 'MPFE le 24/01/2005 For i = 16 To 48 Step 4 If Range("D" & i) = "" Then Range("D" & i, "D" & i + 3).EntireRow.Hidden = True End If Next i End Sub -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Érico" a écrit dans le message de news: %
Bonjour,
C'est qui le pro qui va me répondre?
Voici la question:
Comment masqué les lignes automatiquement lorsque les cellules sont vides
Comme exemple:
Si la cellule D16 est vide, masquer les lignes 16,17,18 et 19 Si la cellule D20 est vide, masquer les lignes 20,21,22 et 23 Si la cellule D24 est vide, masquer les lignes 24,25,26 et 27
ainsi de suite....
Merci
Érico de Montréal
Bonsoir,
Une base avec :
Sub masquesi()
'MPFE le 24/01/2005
For i = 16 To 48 Step 4
If Range("D" & i) = "" Then
Range("D" & i, "D" & i + 3).EntireRow.Hidden = True
End If
Next i
End Sub
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Érico" <hahaha@videotron.ca> a écrit dans le message de news:
%23Yx8xzkAFHA.1452@TK2MSFTNGP11.phx.gbl...
Bonjour,
C'est qui le pro qui va me répondre?
Voici la question:
Comment masqué les lignes automatiquement lorsque les cellules sont vides
Comme exemple:
Si la cellule D16 est vide, masquer les lignes 16,17,18 et 19
Si la cellule D20 est vide, masquer les lignes 20,21,22 et 23
Si la cellule D24 est vide, masquer les lignes 24,25,26 et 27
Sub masquesi() 'MPFE le 24/01/2005 For i = 16 To 48 Step 4 If Range("D" & i) = "" Then Range("D" & i, "D" & i + 3).EntireRow.Hidden = True End If Next i End Sub -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Érico" a écrit dans le message de news: %
Bonjour,
C'est qui le pro qui va me répondre?
Voici la question:
Comment masqué les lignes automatiquement lorsque les cellules sont vides
Comme exemple:
Si la cellule D16 est vide, masquer les lignes 16,17,18 et 19 Si la cellule D20 est vide, masquer les lignes 20,21,22 et 23 Si la cellule D24 est vide, masquer les lignes 24,25,26 et 27
ainsi de suite....
Merci
Érico de Montréal
Érico
Est- ce qu'il faut que je modifie la formule pour rajouter d'autres lignes à masquer? Elle en semble pas fonctionné. Dois-je faire CTRL-ENTER?
"Philippe.R" a écrit dans le message de news:eNv81%
Bonsoir, Une base avec :
Sub masquesi() 'MPFE le 24/01/2005 For i = 16 To 48 Step 4 If Range("D" & i) = "" Then Range("D" & i, "D" & i + 3).EntireRow.Hidden = True End If Next i End Sub -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Érico" a écrit dans le message de news: %
Bonjour,
C'est qui le pro qui va me répondre?
Voici la question:
Comment masqué les lignes automatiquement lorsque les cellules sont vides
Comme exemple:
Si la cellule D16 est vide, masquer les lignes 16,17,18 et 19 Si la cellule D20 est vide, masquer les lignes 20,21,22 et 23 Si la cellule D24 est vide, masquer les lignes 24,25,26 et 27
ainsi de suite....
Merci
Érico de Montréal
Est- ce qu'il faut que je modifie la formule pour rajouter d'autres lignes à
masquer?
Elle en semble pas fonctionné. Dois-je faire CTRL-ENTER?
"Philippe.R" <A_S_rauphil@wanadoo.fr> a écrit dans le message de
news:eNv81%23kAFHA.1392@tk2msftngp13.phx.gbl...
Bonsoir,
Une base avec :
Sub masquesi()
'MPFE le 24/01/2005
For i = 16 To 48 Step 4
If Range("D" & i) = "" Then
Range("D" & i, "D" & i + 3).EntireRow.Hidden = True
End If
Next i
End Sub
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Érico" <hahaha@videotron.ca> a écrit dans le message de news:
%23Yx8xzkAFHA.1452@TK2MSFTNGP11.phx.gbl...
Bonjour,
C'est qui le pro qui va me répondre?
Voici la question:
Comment masqué les lignes automatiquement lorsque les cellules sont
vides
Comme exemple:
Si la cellule D16 est vide, masquer les lignes 16,17,18 et 19
Si la cellule D20 est vide, masquer les lignes 20,21,22 et 23
Si la cellule D24 est vide, masquer les lignes 24,25,26 et 27
Est- ce qu'il faut que je modifie la formule pour rajouter d'autres lignes à masquer? Elle en semble pas fonctionné. Dois-je faire CTRL-ENTER?
"Philippe.R" a écrit dans le message de news:eNv81%
Bonsoir, Une base avec :
Sub masquesi() 'MPFE le 24/01/2005 For i = 16 To 48 Step 4 If Range("D" & i) = "" Then Range("D" & i, "D" & i + 3).EntireRow.Hidden = True End If Next i End Sub -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Érico" a écrit dans le message de news: %
Bonjour,
C'est qui le pro qui va me répondre?
Voici la question:
Comment masqué les lignes automatiquement lorsque les cellules sont vides
Comme exemple:
Si la cellule D16 est vide, masquer les lignes 16,17,18 et 19 Si la cellule D20 est vide, masquer les lignes 20,21,22 et 23 Si la cellule D24 est vide, masquer les lignes 24,25,26 et 27
ainsi de suite....
Merci
Érico de Montréal
Philippe.R
Re, Il s'agit d'une procédure, à coller dans un module standard du projet VBA de ton classeur et qu'il faut lancer via outils / macro / macros. Pour étendre la plage traitée, il suffit de changer 48 par le nombre désiré dans la ligne :
For i = 16 To 48 Step 4
-- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Érico" a écrit dans le message de news: %
Est- ce qu'il faut que je modifie la formule pour rajouter d'autres lignes à masquer? Elle en semble pas fonctionné. Dois-je faire CTRL-ENTER?
"Philippe.R" a écrit dans le message de news:eNv81%
Bonsoir, Une base avec :
Sub masquesi() 'MPFE le 24/01/2005 For i = 16 To 48 Step 4 If Range("D" & i) = "" Then Range("D" & i, "D" & i + 3).EntireRow.Hidden = True End If Next i End Sub -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Érico" a écrit dans le message de news: %
Bonjour,
C'est qui le pro qui va me répondre?
Voici la question:
Comment masqué les lignes automatiquement lorsque les cellules sont vides
Comme exemple:
Si la cellule D16 est vide, masquer les lignes 16,17,18 et 19 Si la cellule D20 est vide, masquer les lignes 20,21,22 et 23 Si la cellule D24 est vide, masquer les lignes 24,25,26 et 27
ainsi de suite....
Merci
Érico de Montréal
Re,
Il s'agit d'une procédure, à coller dans un module standard du projet VBA de ton classeur et qu'il faut
lancer via outils / macro / macros.
Pour étendre la plage traitée, il suffit de changer 48 par le nombre désiré dans la ligne :
For i = 16 To 48 Step 4
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Érico" <hahaha@videotron.ca> a écrit dans le message de news:
%23JpR8SlAFHA.2180@TK2MSFTNGP12.phx.gbl...
Est- ce qu'il faut que je modifie la formule pour rajouter d'autres lignes à
masquer?
Elle en semble pas fonctionné. Dois-je faire CTRL-ENTER?
"Philippe.R" <A_S_rauphil@wanadoo.fr> a écrit dans le message de
news:eNv81%23kAFHA.1392@tk2msftngp13.phx.gbl...
Bonsoir,
Une base avec :
Sub masquesi()
'MPFE le 24/01/2005
For i = 16 To 48 Step 4
If Range("D" & i) = "" Then
Range("D" & i, "D" & i + 3).EntireRow.Hidden = True
End If
Next i
End Sub
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Érico" <hahaha@videotron.ca> a écrit dans le message de news:
%23Yx8xzkAFHA.1452@TK2MSFTNGP11.phx.gbl...
Bonjour,
C'est qui le pro qui va me répondre?
Voici la question:
Comment masqué les lignes automatiquement lorsque les cellules sont
vides
Comme exemple:
Si la cellule D16 est vide, masquer les lignes 16,17,18 et 19
Si la cellule D20 est vide, masquer les lignes 20,21,22 et 23
Si la cellule D24 est vide, masquer les lignes 24,25,26 et 27
Re, Il s'agit d'une procédure, à coller dans un module standard du projet VBA de ton classeur et qu'il faut lancer via outils / macro / macros. Pour étendre la plage traitée, il suffit de changer 48 par le nombre désiré dans la ligne :
For i = 16 To 48 Step 4
-- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Érico" a écrit dans le message de news: %
Est- ce qu'il faut que je modifie la formule pour rajouter d'autres lignes à masquer? Elle en semble pas fonctionné. Dois-je faire CTRL-ENTER?
"Philippe.R" a écrit dans le message de news:eNv81%
Bonsoir, Une base avec :
Sub masquesi() 'MPFE le 24/01/2005 For i = 16 To 48 Step 4 If Range("D" & i) = "" Then Range("D" & i, "D" & i + 3).EntireRow.Hidden = True End If Next i End Sub -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Érico" a écrit dans le message de news: %
Bonjour,
C'est qui le pro qui va me répondre?
Voici la question:
Comment masqué les lignes automatiquement lorsque les cellules sont vides
Comme exemple:
Si la cellule D16 est vide, masquer les lignes 16,17,18 et 19 Si la cellule D20 est vide, masquer les lignes 20,21,22 et 23 Si la cellule D24 est vide, masquer les lignes 24,25,26 et 27
ainsi de suite....
Merci
Érico de Montréal
Érico
Salut,
Merci de m'aider.
J'ai un problème qui est la suivante: J'ai une formule dans les cellules D14, D18 etc.... Donc, elle n'est pas vide. Il faudrait que je change la formule de ton programme et lui dire si le résultat de cette formule est " " ou "0", masque moi les 4 lignes.
Merci encore...
Érico de Montréal
"Philippe.R" a écrit dans le message de news:
Re, Il s'agit d'une procédure, à coller dans un module standard du projet VBA de ton classeur et qu'il faut
lancer via outils / macro / macros. Pour étendre la plage traitée, il suffit de changer 48 par le nombre désiré dans la ligne :
For i = 16 To 48 Step 4
-- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Érico" a écrit dans le message de news: %
Est- ce qu'il faut que je modifie la formule pour rajouter d'autres lignes à
masquer? Elle en semble pas fonctionné. Dois-je faire CTRL-ENTER?
"Philippe.R" a écrit dans le message de news:eNv81%
Bonsoir, Une base avec :
Sub masquesi() 'MPFE le 24/01/2005 For i = 16 To 48 Step 4 If Range("D" & i) = "" Then Range("D" & i, "D" & i + 3).EntireRow.Hidden = True End If Next i End Sub -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Érico" a écrit dans le message de news: %
Bonjour,
C'est qui le pro qui va me répondre?
Voici la question:
Comment masqué les lignes automatiquement lorsque les cellules sont vides
Comme exemple:
Si la cellule D16 est vide, masquer les lignes 16,17,18 et 19 Si la cellule D20 est vide, masquer les lignes 20,21,22 et 23 Si la cellule D24 est vide, masquer les lignes 24,25,26 et 27
ainsi de suite....
Merci
Érico de Montréal
Salut,
Merci de m'aider.
J'ai un problème qui est la suivante: J'ai une formule dans les cellules
D14, D18 etc....
Donc, elle n'est pas vide. Il faudrait que je change la formule de ton
programme et lui dire
si le résultat de cette formule est " " ou "0", masque moi les 4 lignes.
Merci encore...
Érico de Montréal
"Philippe.R" <A_S_rauphil@wanadoo.fr> a écrit dans le message de
news:OdsIIjlAFHA.2552@TK2MSFTNGP09.phx.gbl...
Re,
Il s'agit d'une procédure, à coller dans un module standard du projet VBA
de ton classeur et qu'il faut
lancer via outils / macro / macros.
Pour étendre la plage traitée, il suffit de changer 48 par le nombre
désiré dans la ligne :
For i = 16 To 48 Step 4
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Érico" <hahaha@videotron.ca> a écrit dans le message de news:
%23JpR8SlAFHA.2180@TK2MSFTNGP12.phx.gbl...
Est- ce qu'il faut que je modifie la formule pour rajouter d'autres
lignes à
masquer?
Elle en semble pas fonctionné. Dois-je faire CTRL-ENTER?
"Philippe.R" <A_S_rauphil@wanadoo.fr> a écrit dans le message de
news:eNv81%23kAFHA.1392@tk2msftngp13.phx.gbl...
Bonsoir,
Une base avec :
Sub masquesi()
'MPFE le 24/01/2005
For i = 16 To 48 Step 4
If Range("D" & i) = "" Then
Range("D" & i, "D" & i + 3).EntireRow.Hidden = True
End If
Next i
End Sub
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Érico" <hahaha@videotron.ca> a écrit dans le message de news:
%23Yx8xzkAFHA.1452@TK2MSFTNGP11.phx.gbl...
Bonjour,
C'est qui le pro qui va me répondre?
Voici la question:
Comment masqué les lignes automatiquement lorsque les cellules sont
vides
Comme exemple:
Si la cellule D16 est vide, masquer les lignes 16,17,18 et 19
Si la cellule D20 est vide, masquer les lignes 20,21,22 et 23
Si la cellule D24 est vide, masquer les lignes 24,25,26 et 27
J'ai un problème qui est la suivante: J'ai une formule dans les cellules D14, D18 etc.... Donc, elle n'est pas vide. Il faudrait que je change la formule de ton programme et lui dire si le résultat de cette formule est " " ou "0", masque moi les 4 lignes.
Merci encore...
Érico de Montréal
"Philippe.R" a écrit dans le message de news:
Re, Il s'agit d'une procédure, à coller dans un module standard du projet VBA de ton classeur et qu'il faut
lancer via outils / macro / macros. Pour étendre la plage traitée, il suffit de changer 48 par le nombre désiré dans la ligne :
For i = 16 To 48 Step 4
-- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Érico" a écrit dans le message de news: %
Est- ce qu'il faut que je modifie la formule pour rajouter d'autres lignes à
masquer? Elle en semble pas fonctionné. Dois-je faire CTRL-ENTER?
"Philippe.R" a écrit dans le message de news:eNv81%
Bonsoir, Une base avec :
Sub masquesi() 'MPFE le 24/01/2005 For i = 16 To 48 Step 4 If Range("D" & i) = "" Then Range("D" & i, "D" & i + 3).EntireRow.Hidden = True End If Next i End Sub -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Érico" a écrit dans le message de news: %
Bonjour,
C'est qui le pro qui va me répondre?
Voici la question:
Comment masqué les lignes automatiquement lorsque les cellules sont vides
Comme exemple:
Si la cellule D16 est vide, masquer les lignes 16,17,18 et 19 Si la cellule D20 est vide, masquer les lignes 20,21,22 et 23 Si la cellule D24 est vide, masquer les lignes 24,25,26 et 27