Bonjour =E0 tous
Sur un tableau mensuel, je souhaiterais pouvoir ex=E9cuter=20
d'une mani=E8re automatique, le masquage des colonnes se=20
rapportant aux samedis et dimanches.
Manuellement, je n'ai pas de probl=E8me, avec la MFC=20
joursem (a1 ; 2)>5 m'indiquant les colonnes =E0 masquer,=20
mais alors, pour l'automatisation..... une autre paire de=20
manches.
Depuis hier soir, j'essaye avec l'enregistreur de macro,=20
je ne sors rien de concret.
Si vous aviez une solution =E0 me proposer, je vous en=20
serais reconnaissant.
Merci d'avance
Christian
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
ru-th
Salut Christian
Sub test() For i = Range("iv1").End(xlToLeft).Column To 1 Step -1 If Weekday(Cells(1, i), 2) > 5 Then Columns(i).Hidden = True Next End Sub
a+ rural thierry
"christian" a écrit dans le message de news: 0a0901c38e23$c2c1b4a0$ Bonjour à tous Sur un tableau mensuel, je souhaiterais pouvoir exécuter d'une manière automatique, le masquage des colonnes se rapportant aux samedis et dimanches. Manuellement, je n'ai pas de problème, avec la MFC joursem (a1 ; 2)>5 m'indiquant les colonnes à masquer, mais alors, pour l'automatisation..... une autre paire de manches. Depuis hier soir, j'essaye avec l'enregistreur de macro, je ne sors rien de concret. Si vous aviez une solution à me proposer, je vous en serais reconnaissant. Merci d'avance Christian
Salut Christian
Sub test()
For i = Range("iv1").End(xlToLeft).Column To 1 Step -1
If Weekday(Cells(1, i), 2) > 5 Then Columns(i).Hidden = True
Next
End Sub
a+
rural thierry
"christian" <cmaas1@zonnet.nl> a écrit dans le message de news:
0a0901c38e23$c2c1b4a0$a101280a@phx.gbl...
Bonjour à tous
Sur un tableau mensuel, je souhaiterais pouvoir exécuter
d'une manière automatique, le masquage des colonnes se
rapportant aux samedis et dimanches.
Manuellement, je n'ai pas de problème, avec la MFC
joursem (a1 ; 2)>5 m'indiquant les colonnes à masquer,
mais alors, pour l'automatisation..... une autre paire de
manches.
Depuis hier soir, j'essaye avec l'enregistreur de macro,
je ne sors rien de concret.
Si vous aviez une solution à me proposer, je vous en
serais reconnaissant.
Merci d'avance
Christian
Sub test() For i = Range("iv1").End(xlToLeft).Column To 1 Step -1 If Weekday(Cells(1, i), 2) > 5 Then Columns(i).Hidden = True Next End Sub
a+ rural thierry
"christian" a écrit dans le message de news: 0a0901c38e23$c2c1b4a0$ Bonjour à tous Sur un tableau mensuel, je souhaiterais pouvoir exécuter d'une manière automatique, le masquage des colonnes se rapportant aux samedis et dimanches. Manuellement, je n'ai pas de problème, avec la MFC joursem (a1 ; 2)>5 m'indiquant les colonnes à masquer, mais alors, pour l'automatisation..... une autre paire de manches. Depuis hier soir, j'essaye avec l'enregistreur de macro, je ne sors rien de concret. Si vous aviez une solution à me proposer, je vous en serais reconnaissant. Merci d'avance Christian
christian
Merci Thierry
-----Message d'origine----- Salut Christian
Sub test() For i = Range("iv1").End(xlToLeft).Column To 1 Step -1 If Weekday(Cells(1, i), 2) > 5 Then Columns(i).Hidden = True
Next End Sub
a+ rural thierry
"christian" a écrit dans le message de news:
0a0901c38e23$c2c1b4a0$ Bonjour à tous Sur un tableau mensuel, je souhaiterais pouvoir exécuter d'une manière automatique, le masquage des colonnes se rapportant aux samedis et dimanches. Manuellement, je n'ai pas de problème, avec la MFC joursem (a1 ; 2)>5 m'indiquant les colonnes à masquer, mais alors, pour l'automatisation..... une autre paire de manches. Depuis hier soir, j'essaye avec l'enregistreur de macro, je ne sors rien de concret. Si vous aviez une solution à me proposer, je vous en serais reconnaissant. Merci d'avance Christian
.
Merci Thierry
-----Message d'origine-----
Salut Christian
Sub test()
For i = Range("iv1").End(xlToLeft).Column To 1 Step -1
If Weekday(Cells(1, i), 2) > 5 Then Columns(i).Hidden =
True
Next
End Sub
a+
rural thierry
"christian" <cmaas1@zonnet.nl> a écrit dans le message
de news:
0a0901c38e23$c2c1b4a0$a101280a@phx.gbl...
Bonjour à tous
Sur un tableau mensuel, je souhaiterais pouvoir exécuter
d'une manière automatique, le masquage des colonnes se
rapportant aux samedis et dimanches.
Manuellement, je n'ai pas de problème, avec la MFC
joursem (a1 ; 2)>5 m'indiquant les colonnes à masquer,
mais alors, pour l'automatisation..... une autre paire de
manches.
Depuis hier soir, j'essaye avec l'enregistreur de macro,
je ne sors rien de concret.
Si vous aviez une solution à me proposer, je vous en
serais reconnaissant.
Merci d'avance
Christian
Sub test() For i = Range("iv1").End(xlToLeft).Column To 1 Step -1 If Weekday(Cells(1, i), 2) > 5 Then Columns(i).Hidden = True
Next End Sub
a+ rural thierry
"christian" a écrit dans le message de news:
0a0901c38e23$c2c1b4a0$ Bonjour à tous Sur un tableau mensuel, je souhaiterais pouvoir exécuter d'une manière automatique, le masquage des colonnes se rapportant aux samedis et dimanches. Manuellement, je n'ai pas de problème, avec la MFC joursem (a1 ; 2)>5 m'indiquant les colonnes à masquer, mais alors, pour l'automatisation..... une autre paire de manches. Depuis hier soir, j'essaye avec l'enregistreur de macro, je ne sors rien de concret. Si vous aviez une solution à me proposer, je vous en serais reconnaissant. Merci d'avance Christian