dim nIndex as integer
dim ws as Worksheet
dim tqyf as integer
dim zzhs as integer
zzhs=3
for nIndex=4 to This Workbook. Worksheets. Count
Set ws=ThisWorkbook. Worksheets. count
tqye随for next循环
sheets("总账"). range(cells(2,tqyf+1),cells(zzhs,tqyf+1)).select
提示“应用程序定义或对象定义错误”
zzhs=zzhs+1
next
VBA中可以写成Range(Cells(2,a+1),Cells(b,a+1))吗?
- 写回答
- 好问题 0 提建议
- 关注问题
- 邀请回答
-