Je cache et affiche régulièrement des colonnes dans mes feuilles de calcul. Si j’ai toute une gamme de colonnes cachées, je trouve ça gênant d’afficher une seule colonne parmi toutes celles cachées. Par exemple, si je masque les colonnes C: M et que je souhaite afficher la colonne F, je dois afficher toute la plage, puis masquer à nouveau C: E et G: M. (Il y a d’autres manières d’accomplir la même tâche, mais aucune n’est particulièrement attachante.)

Cependant, je trouve qu’une seule colonne peut être affichée très facilement à l’aide d’une macro. Considérez ce qui suit:

Sub UnhideSingleColumn()

Dim Col As String     Dim rng As Range

StartHere:

Col = InputBox("Enter column to unhide.", "Unhide Column")

If Col = "" Then Exit Sub     On Error Resume Next     ' if not a valid range, an error occurs     Set rng = ActiveSheet.Columns(Col)

If Err.Number <> 0 Then         On Error GoTo 0         Err.Clear         MsgBox "Invalid input! Please input a valid column."

GoTo StartHere     End If

rng.EntireColumn.Hidden = False

MsgBox "Column " & UCase(Col) & " is now visible.", _       vbOKOnly, "Unhide Specified Column"

Set rng = Nothing     On Error GoTo 0 End Sub

La macro invite l’utilisateur pour quelle colonne doit être rendue visible, puis essaie de sélectionner cette colonne. Si la colonne ne peut pas être sélectionnée, une erreur est générée et l’utilisateur est à nouveau invité à entrer. Si la colonne peut être sélectionnée, sa propriété .Hidden est désactivée, rendant ainsi la colonne visible.

_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 (2405) 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:

link: / excelribbon-Unhiding_a_Single_Column [Afficher une seule colonne].