请帮忙合并多个工作簿的所有列到新工作薄

jjmysjg · 发表于 2018-8-12 23:10

不知道为什么发表于 2018-8-12 20:35
给忘了。代码

.[a1].Resize(TopRow, y) = Brr 要求对象

xiangbaoan · 发表于 2018-8-13 06:48

本帖最后由 xiangbaoan 于 2018-8-13 08:05 编辑

…………帮你一下，仅供参考…………

dmp123 · 发表于 2018-8-15 23:59

不知道为什么发表于 2018-8-12 22:46
copy 后面有个空格

您好，在问个问题，.[a1].currentregion赋值给数组在遇到空行和空列就会断开，我的数据里有空行和空列，需要在原代码基础上做如何修改，谢谢！

LMY123 · 发表于 2018-8-16 10:02

dmp123 发表于 2018-8-15 23:59
您好，在问个问题，.[a1].currentregion赋值给数组在遇到空行和空列就会断开，我的数据里有空行和空列， ...

USEDRANGE,试试

		自动登录	找回密码
密码			免费注册

[求助] 请帮忙合并多个工作簿的所有列到新工作薄