Excelでセルをダブルクリックしたときに、指定した行または列を非表示または再表示するにはどうすればよいですか？

通常、行と列は、右クリックしてコンテキストメニューから[非表示]または[再表示]オプションを選択することで、非表示または表示できます。 この記事では、Excelのセルをダブルクリックして、指定した行または列をすばやく非表示または表示する方法について説明します。

VBAコードでセルをダブルクリックするときに、指定した行または列を非表示または再表示します

VBAコードでセルをダブルクリックするときに、指定した行または列を非表示または再表示します

次のVBAコードは、特定のセルをダブルクリックすることで、ワークシート内の指定された行または列をすばやく非表示または再表示するのに役立ちます。 次のようにしてください。

1.行または列を非表示にするワークシートを開きます。 シートタブを右クリックして、 コードを表示 コンテキストメニューから選択します。

2.オープニングで アプリケーション向け Microsoft Visual Basic ウィンドウでは、必要な次の VBA コードのいずれかをコード ウィンドウにコピーしてください。

VBA：ワークシートのセルをダブルクリックして、指定した行を非表示/再表示します。

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby20171226
    Dim xRgHidden As Range
    If (Not Intersect(Target, Range("A1:A4")) Is Nothing) And (Target.Count = 1) Then
        Set xRgHidden = Range("10:13")
        xRgHidden.EntireRow.Hidden = Not xRgHidden.EntireRow.Hidden
    End If
End Sub

VBA: ワークシート内のセルをダブルクリックして、指定した列を非表示/再表示します。

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby20171226
    Dim xRgHidden As Range
    If (Not Intersect(Target, Range("A1:A4")) Is Nothing) And (Target.Count = 1) Then
        Set xRgHidden = Range("D:E")
        xRgHidden.EntireColumn.Hidden = Not xRgHidden.EntireColumn.Hidden
    End If
End Sub

Note：コードでは、 A1：A4, 10:13 • D：E A1:A4 の範囲の任意のセルをダブルクリックすると、行 10:13 または列 D:E が自動的に非表示になることを示します。

3。 プレス 他の + F11 を閉じるためのキー アプリケーション向け Microsoft Visual Basic 窓。

今後、範囲 A1:A4 のセルをダブルクリックすると、行 10:13 または列 D:E が自動的に非表示になります。 セルを再度ダブルクリックすると、非表示の行または列がすべてすぐに表示されます。

関連記事：

• セルをクリックまたはダブルクリックして、指定したユーザーフォームをExcelで開くにはどうすればよいですか？
• Excelでダブルクリックしてセルにチェックマークを追加するにはどうすればよいですか？
• Excelでダブルクリックしてセルに現在の日付/時刻を自動追加/入力するにはどうすればよいですか？
• セルをダブルクリックして、Excelでそのセルの値に1を追加するにはどうすればよいですか？
• Excelで特定のセルをクリックしたときにカレンダーをポップアップするにはどうすればよいですか？