Visual Basic编程实现Excel表操作

 

使用Visual Basic编程录制Excel宏可以实现表格中大量数据的不同操作,提高工作效率。

下述函数实现 Excel表格中匹配条件下,表格间的复制操作,具体实现见中文注释。

//Excel录制宏名称:RefMoveList;函数起始:

Sub RefMoveList()

 

//for循环语句,定义循环 for(int i =4;i<=13842;)

For i = 4 To 13842

//for循环语句,定义循环 for(int j =3;i<=2173;)

For j = 3 To 2173

 

 

 

//If 判断语句,如果Excel表格(行,列)内容: (i, 1) = =(j, 82),则条件为真。

If Cells(i, 1) = Cells(j, 82) Then

//赋值语句, (j, 84) = =(i, 5)

Cells(j, 84) = Cells(i, 5)

 

 

 

//代码注释方式: '

'If Cells(j, 85) <> "" Then
'Cells(i, 5) = Cells(j, 85)
'End If

 

 

 

//跳转语句

GoTo OK

你可能感兴趣的:(C)