Masquer colonnes si vide

Bonjour,

J'ai un petit problème, je souhaiterais masquer les colonnes d'un tableau lorsqu'elles sont vides. Mon tableau est automatisé et les cellules vides changes en fonction du mois choisi. Donc j'aimerai savoir si c'est possible de masquer les colonnes qui sont vides.

Merci de vos réponses

Bonjour Fireblanc, bonjour le forum.

Pour éviter de boucler sur toutes les colonnes de l'onglet, l'ideal serait de savoir dans quelle ligne commence ton tableau et quelle est la colonne qui est automatiquement remplie, pour déterminer la dernière ligne éditée de celui-ci...

Le tableau commence en E5 et fini en AN17. Cependant aucune colonne n'est fixe, elle changent toutes, passant de vide à rempli. Je met en lien l'excel pour avoir une vision plus clair du tableau.

Re,

Peut-être comme ça :

Sub Macro1()
Dim O As Worksheet 'déclare la variable O (Onglet)
Dim COL As Byte 'déclare la variable COL (COLonne)

Set O = Worksheets("Feuil1") 'définit l'onglet O (à adapter à ton cas)
For COL = 5 To 40 'boucle sur les colonne 5 à 40 (=> E à AN)
    'masque (>0) /affiche(=0) la colonne en fonction du nombre de valeurs contenues dans la colonne
    O.Columns(COL).Hidden = IIf(Application.WorksheetFunction.CountA(O.Columns(COL)) = 0, True, False)
Next COL 'prochaine colonne de la ligne
End Sub

Merci Thau Thème, pour ton aide. Grace à ta macro j'ai réussi à masquer les colonnes vides