Afficher plusieurs feuilles de calcul (Microsoft Excel)
Lorsque vous choisissez de masquer des feuilles de calcul dans un classeur, Excel vous permet de masquer plusieurs feuilles en une seule action: tout ce que vous avez à faire est de sélectionner les feuilles avant de faire le masquage. Afficher les feuilles de calcul est une autre histoire, cependant. Excel ne vous permet d’en afficher qu’un à la fois.
Si vous souhaitez afficher de nombreuses feuilles de calcul, cela peut être très fastidieux.
Le seul moyen de contourner ce problème consiste à utiliser une macro pour afficher les feuilles de calcul. La macro VBA suivante affichera toutes les feuilles de calcul du classeur actuel:
Sub UnhideAllSheets() Dim wsSheet As Worksheet For Each wsSheet In ActiveWorkbook.Worksheets wsSheet.Visible = xlSheetVisible Next wsSheet End Sub
Si vous préférez ne pas afficher toutes les feuilles de calcul à la fois, vous pouvez faire en sorte que la macro pose des questions sur chaque feuille de calcul masquée, puis afficher chacune que vous acceptez d’afficher. La macro suivante gérera cette tâche:
Sub UnhideSomeSheets() Dim sSheetName As String Dim sMessage As String Dim Msgres As VbMsgBoxResult For Each wsSheet In ActiveWorkbook.Worksheets If wsSheet.Visible = xlSheetHidden Then sSheetName = wsSheet.Name sMessage = "Unhide the following sheet?" _ & vbNewLine & sSheetName Msgres = MsgBox(sMessage, vbYesNo) If Msgres = vbYes Then wsSheet.Visible = xlSheetVisible End If Next wsSheet End Sub
_Note: _
Si vous souhaitez savoir comment utiliser les macros décrites sur cette page (ou sur toute autre page des sites ExcelTips), j’ai préparé une page spéciale qui comprend des informations utiles.
lien: / excelribbon-ExcelTipsMacros [Cliquez ici pour ouvrir cette page spéciale dans un nouvel onglet de navigateur]
.
ExcelTips est votre source pour une formation Microsoft Excel rentable.
Cette astuce (2603) s’applique à Microsoft Excel 97, 2000, 2002 et 2003. Vous pouvez trouver une version de cette astuce pour l’interface ruban d’Excel (Excel 2007 et versions ultérieures) ici:
lien: / excelribbon-Unhiding_Multiple_Worksheets [Afficher plusieurs feuilles de travail]
.