摘要:
一、 认识VBA数组及常用操作 引例:计算所属区域的总金额 Sub test() Dim i, k Dim t t = Timer '获取时间值 For i = 2 To 200000 If Range("g" & i) = Range("n5") Then k = k + Range("j" & 阅读全文
摘要:
•将对象赋值到变量 用到Set •将对象赋值到变量中的好处 •将单元格赋值到变量 •将工作表赋值到变量 Sub test() Dim i As Integer Dim sht As Worksheet For i = 2 To 5 Set sht = Sheets.Add sht.Name = Sh 阅读全文
摘要:
在VBA中创建自定义函数 格式: Function A() .......... End Function •创建带参数的过程 Function A(str as String) (A = ......) ' 可用函数名接受返回值 .......... End Function 类比: 在Sub B 阅读全文