Masquage de colonne quand il n'y a rien dedans

[romfret]

Salut a tous c'est moi !
J voulai vous dire que pour mes autres problemes j'ai tous réglé mais la je ne sais vraiment pas quoi faire :
Quand il n'y a rien d'afficher dans une colonne, est-ce possible de la masquer ?

Merci de votre réponse !
Romfret

 

[Schmail]

Bonsoir romfret et le forum

Je t'ai trouvé cela sur <http://xlbysteph.free.fr/index.html>

Sub MasquerColonne
Dim numcol As Integer
For numcol = 1 To ActiveSheet.UsedRange.Columns.Count
If Application.WorksheetFunction.CountA(Columns(numcol)) = 0 Then
Columns(numcol).Hidden = True
End If
Next numcol
End Sub

me demande pas pourquoi CountA, je n'en sais rien
j'ai fait quelques essai avec count sans A et cela fonctionne également
Si un connaisseur passe par ce fil, je suis preneur pour une explication car pas trouvé dans l'aide VBA

Bonne soirée et @+