ワークシートの列を定期的に非表示にしたり再表示したりしています。すべての列を非表示にしている場合、非表示になっているすべての列から1つの列を再表示するのは面倒です。たとえば、列C：Mを非表示にし、後で列Fを再表示したい場合があります。これを行うにはいくつかの方法があります。

  • 範囲全体を再表示してから、C：EとG：Mを再表示します。

  • セルF1を[名前]ボックスに入力し、リボンの[ホーム]タブにある[書式設定]ツールで使用できるコントロールを使用して、列を再表示します。

[名前]ボックスにセルF1を入力し、Ctrl + Shift + 0 *を押して列を再表示します。

列を再表示する方法は他にもいくつかありますが、（私が言ったように）そのようなアプローチは面倒です。単一の列または列の範囲のいずれかを再表示することは、気の利いた小さなマクロを介して非常に簡単に行うことができます。

次のことを考慮してください：

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

マクロは、どの列を表示するかをユーザーに促し、その列を選択しようとします。列を選択できない場合は、エラーが生成され、ユーザーは再度入力を求められます。列を選択できる場合は、その.Hiddenプロパティがオフになり、列が表示されます。

注：

このページ（または_ExcelTips_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

linkここをクリックして、新しいブラウザタブでその特別なページを開きます。

_ExcelTips_は、費用効果の高いMicrosoftExcelトレーニングのソースです。

このヒント（11471）は、Microsoft Excel 2007、2010、2013、および2016に適用されます。

Excelの古いメニューインターフェイスに関するこのヒントのバージョンは、 linkUnhiding a SingleColumnにあります。