如何在Excel中选择每隔一行或第n行？

网友投稿 418 2024-01-16

如何在Excel中选择每隔一行或第n行？

有时，当我们使用工作表时，我们需要选择工作表的每隔一行或第n行以进行格式化，删除或复制。您可以手动选择它们，但是如果有数百行，则此方法不是一个好的选择。这里有一些技巧可以帮助您。

使用VBA选择每隔一行或第n行

选择每隔一行或第 n 行 Kutools for Excel

使用VBA选择每隔一行或第n行

在此示例中，我将选择两个间隔的一行。使用VBA代码，可以完成以下操作：

1.突出显示要每隔一行或第n行选择的范围。

2.Click 开发商 > Visual Basic中，一个新的 适用于应用程序的Microsoft Visual 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

Copy

3.然后点击按钮运行代码。并弹出一个对话框供您选择范围。看截图：

4。点击 OK

，在这种情况下，我在另一个弹出对话框中输入3作为间隔行。看截图

5。点击 OK

，并选择了每三行。看截图：

您可以根据需要更改间隔 Kutools对于Excel 对话。

选择每隔一行或第 n 行 Kutools for Excel

使用VBA代码，您只能选择具有指定间隔的一行，如果您需要选择具有指定间隔的两，三或其他行，则 Kutools for Excel 可以帮助您轻松方便地解决此问题。

Kutools for Excel, 与超过 300 方便的功能，使您的工作更加轻松。

免费下载全天免费提供

后 免费安装 Kutools for Excel，请执行以下操作：

1。点击 Kutools > Select > Select Interval Rows & Columns…，请参见屏幕截图：

2.在 Select Interval Rows & Columns 对话框，单击按钮选择所需范围，然后选择 Rows or Columns 止 Select 部分，然后在 Interval of 输入框和 Rows 输入框。看截图：

笔记：1.如果您需要选择选择项中的每隔一行，请在“输入间隔”框中输入2，在“输入间隔”中输入1。 Rows 输入框。

2.如果要选择所需的整个行，可以检查 Select entire rows

选项。

演示
每隔一行或第n行用 Kutools for Excel

如果您想在每隔一行阴影范围，以使数据看起来更加出色，如下面的屏幕截图所示，则可以应用 Kutools for Excel“ Alternate Row/Column Shading 功能以快速处理工作。