日志
Excel
| ||
Sub 宏1()
'
' 宏1 宏
'Cells(2, 1).Select '选中单元格
Cells(2, 1).Value = 2 '赋值操作
'Cells(2, 1).Cut '剪切
Cells(3, 1).Value = Cells(2, 1).Value '获取以及赋值操作
Cells(4, 1).Value = Sheet1.UsedRange.Rows.Count '返回有数的行数
For i = 1 To 20 '循环，从1开始
Cells(i, 2).Value = 4
If i = 4 Then 'if语句, = > <
Cells(i, 2) = 20
End If
Next i '下一个i
'
End Sub
全部作者的其他最新日志
- • VIM
- • 脚本资料
- • 来EETOP的第一天
/1 
eetop公众号
创芯大讲堂
创芯人才网