Afficher toutes les lignes et colonnes masquées avec Excel VBA

Lorsque vous visualisez des feuilles créées par d’autres utilisateurs, vous voulez être sûr que leur contenu est affiché. Pour l’obtenir, vous devez vous assurer qu’aucune ligne ou colonne n’est cachée. Cette simple macro découvre automatiquement toutes les lignes et colonnes masquées.
Comment ca marche?
Dans cette macro, nous utilisons la collection de feuilles Columns and Rows. Chacune d’entre elles possède la propriété dont la valeur détermine si les objets d’une collection donnée sont visibles ou masqués. Compléter la macro révélera toutes les colonnes de la collection Columns et toutes les lignes de la collection Rows.

Sub AfficherColonneLigne ()
Columns.EntireColumn.Hidden = False
Rows.EntireRow.Hidden = False
End Sub

 

Comment utiliser la macro?
Le meilleur endroit pour stocker cette macro est le classeur de macros personnelles. Merci à cette macro sera toujours disponible. Un classeur de macros personnelles est chargé à chaque démarrage d’Excel. Dans la fenêtre Projet de l’éditeur VBE, il s’appelle PERSONAL.XLSB.
1. Utilisez les touches Alt + F11 pour activer Visual Basic Editor.
2. Dans la fenêtre Projet, cliquez avec le bouton droit sur PERSONAL.XLSB.
3. Sélectionnez Insérer / Module dans le menu.
4. Tapez ou collez le code.
Si vous ne pouvez pas voir le fichier PERSONAL.XLSB, cela signifie qu’il n’a pas encore été créé. Enregistrez la macro et indiquez le classeur de macros personnelles comme emplacement de stockage.
Pour enregistrer la macro dans l’album de macros personnelles, sélectionnez-la dans la boîte de dialogue Relecture de la macro qui apparaît lors de l’enregistrement de la macro. Cette option est disponible dans la liste déroulante Store macro. Il suffit d’enregistrer le clic de plusieurs sociétés, puis de remplacer la macro par celle décrite précédemment.

S’abonner
Notifier de
0 Commentaires
Inline Feedbacks
Voir tous les commentaires

Fonctions Excel

Macro VBA Utiles

Excel Pratique

Programmation VBA

Sur Facebook

Sur YouTube

0
Nous aimerions avoir votre avis, veuillez laisser un commentaire.x
()
x