UC知道方法‘Range’作用于对象'_Global'时出错
来源：百度知道 编辑：UC知道 时间：2024/06/15 01:40:07
我想让Excel中每条记录上都加上相同的标题栏。我用了VBA，代码是：
sub inserttitle
line=3
while cells（line,1）<>""
Range (rows(1)).copy
rows(line).insert xldown
line=line+2
wend
end sub
sub inserttitle
line=3
while cells（line,1）<>""
Range (rows(1)).copy
rows(line).insert xldown
line=line+2
wend
end sub
Range()的写法有点小问题而已，改成这样就好了：
Sub inserttitle()
Line = 3
While Cells(Line, 1) <> ""
Range(Rows(1), Rows(1)).Copy
Rows(Line).Insert xlDown
Line = Line + 2
Wend
Application.CutCopyMode = False
End Sub