【008】表格数据逐行筛选，跳出for循环及跳过本次循环思路_#VBA

1. 目的

利用excel对大量数据进行筛选复制并黏贴，案例如下

1.1 根据数据筛选，每次黏贴时连接在一起

1.2 根据数据筛选，每次黏贴逐列分开

2. 实现方式

2.1 基本功能

2.1.1 复制

范围复制

Range(Cells(i, 1), Cells(i + 9, 2)).Copy

2.1.2 剪切

范围选择剪切

Range(Cells(i, 1), Cells(i + 13, 2)).Cut

2.1.3 黏贴

基于某单元格进行黏贴

Cells((j - 1) * 14 + 3, 5).Select
ActiveSheet.Paste

2.1.4 循环

主体循环

For i = 1 To 1534
	' 循环主体内容
Next

跳出循环

For i = 1 To 1534
	If Not Cells(i, 2) = "NaN" Then
		Exit For
    End If    ' 跳出循环
Next

跳过本次循环，进入一次循环
——因为VBA中没有continue，故只能通过 if 语句实现

For i