Office中国论坛/Access中国论坛

标题: [VBA]给VBA加速之合计处理 [打印本页]

作者: toolssoft    时间: 2012-6-19 16:28
标题: [VBA]给VBA加速之合计处理
【开发语言】
        VBA
【功能简介】
        使用For等循环进行数据合计处理,当数据量很大时,就有可能花费相当长时间才能得到计算结果。
        这种情况下,我们就应该考虑使用Excel内置的工作表函数技巧,实现意想不到的处理速度。

【代码实例】
  1. '慢的例子
  2. Sub Sample1()
  3. Dim i As Long
  4. Dim j As Long
  5. For i = 1 To 50
  6. For j = 1 To 15
  7. Cells(i, j) = Cells(i, j).Address(False, False)
  8. Next
  9. Next
  10. End Sub

  11. '快的例子
  12. Sub Sample2()
  13. Dim rngCell As Range
  14. For Each rngCell In Range("A1:O50")
  15. rngCell.Value = rngCell.Address(False, False)
  16. Next
  17. End Sub
复制代码
姐妹篇
[VBA]给VBA加速之连续区域处理技巧
[VBA]给VBA加速之使用对象技巧
[VBA]给VBA加速之单元格自动重新计算
[VBA]给VBA加速之拷贝粘贴处理
技术资料栏目下载






欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3