ExcelでXNUMX行おきに非表示にする方法は？

ExcelでXNUMX行おきに非表示にする必要がある場合、どうすればすばやく実行できますか？ 行を次々に隠すだけですか？ または、次の手順を実行して、ExcelでXNUMX行おきにすばやく非表示にすることもできます。

VBAコードでXNUMX行おきに非表示

Kutools forExcelでXNUMX行おきに非表示

VBAコードでXNUMX行おきに非表示

次の短いVBAコードは、XNUMX行おきにすばやく非表示にするのに役立ちます。次の手順に従ってください。

1に設定します。 OK をクリックします。 Developer > ビジュアルベーシック、新しいです アプリケーション用のMicrosoftVisual Basic ウィンドウが表示されたら、をクリックします インセット > モジュール、次のコードをに入力します モジュール:

Sub HideAndShow()
'update20131220
Dim Rng As Range
Dim WorkRng As Range
Dim xRows As Long
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xRows = WorkRng.Rows.Count
For i = 1 To xRows Step 2
    WorkRng.Rows(i).Hidden = True
Next i
End Sub

2。 次に、をクリックします F5 キーを押してコードを実行すると、使用する範囲を選択するように指示するプロンプトボックスが表示されます。 スクリーンショットを参照してください：

3。 そして、 OK、最初の行のすべての行が交互に非表示になっています。 スクリーンショットを参照してください：

Note：上記では、 i = 1 は変数であり、非表示になっている開始行を表します。必要に応じて変更できます。 使用する場合 i = 1、最初の行から始まるすべての行が交互に非表示になります。 i = 2、XNUMX行目から始まるすべての行が交互に非表示になります。

Kutools forExcelでXNUMX行おきに非表示

Kutools for Excel：120以上の便利なExcelアドインがあり、30日以内に制限なしで無料で試すことができます。 今すぐ入手.

連絡先 Kutools for Excel、XNUMXつの主要な手順でXNUMX行おきに非表示にできます。

A：最初にXNUMX行おきに 間隔の行と列を選択します ツール;

B：非表示に設定します。 次のようにします。

1。 使用する範囲を選択します。

2に設定します。 OK をクリックします。 クツール > 選択 > 間隔の行と列を選択します

3。 の中に 間隔の行と列を選択します ダイアログボックス、チェック 行 下のオプション 選択 セクションに入力し、番号1を個別に の間隔 • 行 ボックス。 そしてチェック 行全体を選択 オプション。 スクリーンショットを参照してください：

4。 そして、 OK。 すべての代替行が選択されました。

5。 強調表示されている行の任意の行ヘッダーにカーソルを置き、右クリックして選択します 隠す メニューから。 そして、すべての代替行が非表示になっています。 スクリーンショットを参照してください：

この機能の詳細については、クリックしてください。

関連記事：

ExcelでXNUMX行おきまたはn行目を選択するにはどうすればよいですか？

ExcelでXNUMX行おきに削除するにはどうすればよいですか？

ExcelでXNUMX行おきにすばやくコピーするにはどうすればよいですか？