XL 2016 Aide dans creation macro

Cris tof

XLDnaute Nouveau
Bonjour a tous,

je souhaite créer une macro pour pouvoir masquer des colonnes du fichier excel sous certaines conditions

J'ai suivi à la lettre les indications ci dessous mais ca ne fonctionne pas

Je démarre tout juste dans le Visual Basic

Help please !! merci

1603369232837.png



Sub Masquer_Jour()
Dim Num_Col As Long
For Num_Col = 30 To 32 ' Boucle sur les cellules des jours 29, 30 et 31
If Month(Cells(6, Num_Col)) >= Cells(1, 1) Then
Columns(Num_Col).Hidden = True
Else
Columns(Num_Col).Hidden = False
End If
Next
Range("B6:AF13").ClearContents 'Supprime le contenu dans les cellules
End Sub
 

Fichiers joints

Cris tof

XLDnaute Nouveau
Bonjour Cris tof, bonjour le forum,

En pièce jointe ton fichier modifié qui devient .xlsm puisqu'il contient désormais une macro.


Merci Robert , c'est exactement ce que je cherchait à faire !

Une petite précision quand je mets une valeur ou texte dans une cellule du fichier excel ( exemple Fevrier 2020 H8 ) et que je change de mois et que je reviens sur Février 2020 , la valeur ou texte a disparu malgré l'enregistrement

Une idée peut etre !
Sachant que les valeurs ou texte d'une cellule peuvent variés en fonction des mois et années

Merci
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas