VBA 中需要针对行的操作

VBA 中需要针对行的操作。

如选择某一行，或选择多行。

以下是引用当前活动工作表中的行操作。

Rows(2).select  选择第二行

Rows(3:4).select  选择第三行第四行

Range("7:7,9:9,11:11").select  选择第7行，第9行,第11行。

如果需要选择多行不连续的，如选择第2行到第100行的偶数行。

可以使用一个循环。

Private Sub CommandButton1_Click() Rows(2).Select For i = 4 To 100 Step 2 Application.Union(Selection, Rows(i)).Select NextEnd Sub

以上代码选择第2行到第100行所有偶数行。

先选择第2行，然后第4行到第100行，每隔2循环。

使用union进行合并，将当前选择的与i行进行合并选择，i行是从第4行到第100行循环。

如果选择a1:f100中所有隔行的操作，可以再添加一句。

Private Sub CommandButton1_Click() Rows(2).Select For i = 4 To 100 Step 2 Application.Union(Selection, Rows(i)).Select Next Application.Intersect(Selection, Range("a1:f100")).SelectEnd Sub

第2到第100行整行选择之后再和a1:f100取相交的部分。

子曰：用之则行，不用则藏。

意思是说，如果你用我的这些建议，就马上行动，知行合一，如果你不用，就赶紧收藏，以绝后患。