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

ワークシートを使用する場合、フォーマット、削除、またはコピーの目的で、シートのXNUMX行おきまたはn行目を選択する必要がある場合があります。 手動で選択できますが、行数が数百の場合、この方法は適切ではありません。 ここにあなたを助けるためのいくつかのトリックがあります。

VBAでXNUMX行おきまたはn行目を選択します

Kutools forExcelでXNUMX行おきまたはn行目を選択します

VBAでXNUMX行おきまたはn行目を選択します

この例では、XNUMXつの間隔でXNUMXつの行を選択します。 VBAコードを使用すると、次のように終了できます。

1行おきまたはn行目で選択する範囲を強調表示します。

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

Sub EveryOtherRow()
Dim rng As Range
Dim InputRng As Range
Dim OutRng As Range
Dim xInterval As Integer
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
xInterval = Application.InputBox("Enter row interval", xTitleId, Type:=1)
For i = 1 To InputRng.Rows.Count Step xInterval + 1
    Set rng = InputRng.Cells(i, 1)
    If OutRng Is Nothing Then
        Set OutRng = rng
    Else
        Set OutRng = Application.Union(OutRng, rng)
    End If
Next
OutRng.EntireRow.Select
End Sub

3.次にクリックします ボタンを押してコードを実行します。 また、範囲を選択するためのダイアログがポップアップ表示されます。 スクリーンショットを参照してください：

4。 クリック OK、この場合、別のポップアウトダイアログに間隔行として3を入力します。 スクリーンショットを見る

5。 クリック OK、およびXNUMX行ごとに選択されています。 スクリーンショットを参照してください：

あなたは秒で必要に応じて間隔を変更することができます Kutools for Excel ダイアログ。

Kutools forExcelでXNUMX行おきまたはn行目を選択します

VBAコードでは、指定された間隔でXNUMXつの行のみを選択できます。指定された間隔でXNUMXつ、XNUMXつ、またはその他の行を選択する必要がある場合は、 Kutools for Excel この問題を簡単かつ便利に解決するのに役立ちます。

後 無料インストール Kutools for Excel、以下のようにしてください：

1。 クリック クツール > Select > Select Interval Rows & Columns…、スクリーンショットを参照してください：

2。 の中に  Select Interval Rows & Columns ダイアログボックスをクリックします ボタンをクリックして必要な範囲を選択し、 Rows or Columns から Select 、で必要な番号を指定します Interval of 入力ボックスと Rows 入力ボックス。 スクリーンショットを参照してください：

注意：
1.選択範囲で2行おきに選択する必要がある場合は、[入力の間隔]ボックスに1を入力し、[入力の間隔]ボックスにXNUMXを入力してください。 Rows 入力ボックス。

2.必要な行全体を選択する場合は、次のことを確認できます。 Select entire rows オプションを選択します。

関連記事：

• Excelでn番目ごとの列を選択します
• XNUMX行おきにコピー
• XNUMX行おきに削除
• XNUMX行おきに非表示