Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel masquer lignes et colones vides

masquer lignes et colones vides

2 réponses
Avatar
Gérard
Bonjour

Comment peut-on masquer automatiquement toutes les lignes et colonnes d'un
tableau non utilisées.

Merci

gégé84
Signaler un problème avec ce contenu

2 réponses

Supprimer
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
Avatar
isabelle
bonjour Gérard,

Sub Macro1()
Dim c As Range

For Each c In Range("Tableau")
If Application.CountA(Range("Tableau").Rows(c.Row)) = 0 Then _
Range("Tableau").Rows(c.Row).Hidden = True
Next

For Each c In Range("Tableau")
If Application.CountA(Range("Tableau").Columns(c.Column)) = 0 Then _
Range("Tableau").Columns(c.Column).Hidden = True
Next

End Sub

isabelle




Bonjour

Comment peut-on masquer automatiquement toutes les lignes et colonnes d'un
tableau non utilisées.

Merci

gégé84


Avatar
AV
Sans boucler....

Sub zzz()
With Range("Tableau").SpecialCells(xlCellTypeBlanks)
.EntireRow.Hidden = True
.EntireColumn.Hidden = True
End With
End Sub

AV