vba吧 关注：17,083贴子：66,887
- 9回复贴，共1页
，这个是用来整合外部的文件的，这些表格里面都有不同数量的表格。
不感兴趣
开通SVIP免广告
1.set为啥在第四行不需要用上
set 一般用于对象。我这里有个建议给你，就是一般set后的对象 可以写子属性
比如说 set sht=sheets(sheets.count) 把 最后一张表 给了sht
那么我们可以用 sht.name=xxx这样来改变他的子属性
str=dir给的是一串文本 所以不需要set str也没有子属性。
2.第六行open不是动作吗，为啥可以赋值
首先 我们程序是从右往左执行的。 比如 i=i+1 先执行i+1然后再把 结果赋值给I
set wb=workbook.open(xxx）
先打开某个工作簿，然后把这个工作簿 给了变量 WB
你可以 不set 也可以打开 workbook.open "xxxx.xxxx"
你么你需要再用 set wb=workbooks(xxx.xxxx) 把这个工作表赋值给wb方便操作。
一次性打开并且赋值更为方便。尤其是以后用到shape更要使用set
3.表格的复制粘贴不应该要提前建好新表格吗，为啥这个上面没有
你新建表格，然后把数据复制过去，那么你复制的不是表格而是单元格。
先sheets.add 然后 原来的sheets("旧").cells.copy sheets("新").range("A1")
是不是 执行了 单元格的复制过程
sheet.copy 就是把表格复制过去，就跟你手工操作再表格名称上右键，复制移动。
4.如果按照第3个问题写的话，该怎么写啊
set xxx=Sheets.Add(after:=Sheets(Sheets.Count))
xxx.name=xxxxx
sheets("旧").cells.copy xxx.range("A1")
set 一般用于对象。我这里有个建议给你，就是一般set后的对象 可以写子属性
比如说 set sht=sheets(sheets.count) 把 最后一张表 给了sht
那么我们可以用 sht.name=xxx这样来改变他的子属性
str=dir给的是一串文本 所以不需要set str也没有子属性。
2.第六行open不是动作吗，为啥可以赋值
首先 我们程序是从右往左执行的。 比如 i=i+1 先执行i+1然后再把 结果赋值给I
set wb=workbook.open(xxx）
先打开某个工作簿，然后把这个工作簿 给了变量 WB
你可以 不set 也可以打开 workbook.open "xxxx.xxxx"
你么你需要再用 set wb=workbooks(xxx.xxxx) 把这个工作表赋值给wb方便操作。
一次性打开并且赋值更为方便。尤其是以后用到shape更要使用set
3.表格的复制粘贴不应该要提前建好新表格吗，为啥这个上面没有
你新建表格，然后把数据复制过去，那么你复制的不是表格而是单元格。
先sheets.add 然后 原来的sheets("旧").cells.copy sheets("新").range("A1")
是不是 执行了 单元格的复制过程
sheet.copy 就是把表格复制过去，就跟你手工操作再表格名称上右键，复制移动。
4.如果按照第3个问题写的话，该怎么写啊
set xxx=Sheets.Add(after:=Sheets(Sheets.Count))
xxx.name=xxxxx
sheets("旧").cells.copy xxx.range("A1")
