Liste des feuilles de calcul Excel masquées

Anonim

Comment générer une liste des tables cachées à l'aide de VBA

Vous pouvez rendre les feuilles d'un classeur invisibles avec la commande "Format - Feuille - Cacher". Il est alors toujours possible d'accéder au contenu du tableau à l'aide d'une formule, mais le tableau n'est plus visible.

Si vous avez besoin d'une liste de toutes les feuilles de calcul masquées dans le classeur actif, vous pouvez utiliser la macro suivante :

Sous-listeHiddenTablesOn ()
Dim Table As Worksheet, NewTable As Worksheet
Dim CurrentMappe en tant que classeur
Diminuer en tant qu'entier
Définir CurrentMappe = ActiveWorkbook
Définir NeueTabelle = Workbooks.Add.Sheets (1)
Pour chaque table dans CurrentMappe.Worksheets
Si Table.Visible = Faux Alors
je = je + 1
NewTable.Cells (i, 1) .Value = Table.Name
Fin si
Tableau suivant
Fin du sous-marin

La macro parcourt toutes les feuilles de calcul et vérifie la propriété Visible. S'il n'est pas satisfait, il s'agit d'une feuille de calcul masquée. Ensuite, le nom de la feuille est transféré dans la liste.

La macro répertorie les noms de toutes les feuilles de calcul masquées dans un tableau dans un nouveau classeur.

La figure montre le résultat de la macro lorsqu'il y a trois feuilles de calcul masquées dans le classeur actif : « Masquée », « Masquée » et « Invisible ».

Astuce : Si vous souhaitez savoir comment saisir et démarrer des macros dans Excel, vous trouverez une brève description ici :
www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie-makros-in-excel-ein.html