因此,几周前,我在一个网站上发现了一些代码,这些代码完全可以满足我的需求,但是我只是想知道下面的代码究竟是做什么的,因为对我来说,使用清除文档更有意义MainSheet1.Cells.Clear
,然后做一系列的Range("Z1").Value = "Group"
例子
为什么这个人选择制作一个数组并以这种方式填充它?
Sub CLEAR_DOCUMENT()
'
Dim headers(1 To 4, 1 To 15) As Variant
MainSheet1.Cells.Clear
headers(4, 1) = "Group"
headers(4, 2) = "Look"
headers(4, 3) = "Time"
headers(4, 4) = "Tie"
headers(4, 5) = "Type"
headers(4, 6) = "Name"
headers(4, 7) = "Num"
headers(1, 8) = "School 2"
headers(1, 9) = "Group 2"
headers(2, 8) = "*"
headers(2, 9) = ">0"
headers(1, 11) = "Time"
headers(1, 12) = "Language"
headers(1, 13) = "School 1"
headers(1, 14) = "Age"
headers(1, 15) = "Eng"
MainSheet1.Range("Z1:AN4").Value = headers
Application.EnableEvents = True
End Sub
您发布的代码比一次填充一个单元格要快得多。
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句