|
|
|
|
Bonjour,
Dans une feuille excel, j'ai l'énumération des mois de janvier 2007 à décembre 2008 :
A1 A2 A3 A4 A5 A6 A7 A8 A9 A10
janv-07 févr-07 mars-07 avr-07 mai-07 juin-07 juil-07 août-07 sept-07 oct-07
A11 A12 A13 A14 A15 A16 A17 A18 A19 A20
nov-07 déc-07 janv-08 févr-08 mars-08 avr-08 mai-08 juin-08 juil-08 août-08
A21 A22 A23 A24
sept-08 oct-08 nov-08 déc-08
Je voudrais, à l'aide d'un code VB, masquer des colonnes :
Si nous sommes en octobre 2008, je veux que seules les colonnes de octobre 2007 à octobre 2008 s'affichent.
Quelqu'un a-t-il une solution à me proposer?
Merci d'avance.
oganouo
Configuration: Windows XP Internet Explorer 6.0
Bonjour,
Dim CACHER As Boolean
Dim ICOL As Integer
CACHER = True
For ICOL = 1 To 24
If Month(Now) = Month(Cells(1, ICOL)) Then
Columns(ICOL).EntireColumn.Hidden = False
CACHER = Not (CACHER)
Else
Columns(ICOL).EntireColumn.Hidden = CACHER
End If
Next ICOL
On suppose que les colonnes vont de 1 à 24 et on teste si le mois dans l'entête de colonne est le même que le mois courant. Tant que ce n'est pas le mois courant on cache les colonnes puis on affiche et ensuite on cache à nouveau. Cordialement, |
Afficher numero de ligne vb excel Calendrier excel sur une colonne Excel 2007 affiche la formule au lieu de la calculer Excel afficher colonne avec texte Excel afficher colonne masquee Excel cellule numero colonne Excel inverser lignes colonnes Excel jointure entre colonne Excel lister mot colonne Excel masquer lignes couleur Excel modifier case colonne Excel supprimer doublons colonne Excel toujours afficher une colonne Filename vb excel Macro excel 4 insertion colonne Masquer afficher ligne excel par macros Vb excel Vb excel tutorial formulaire
