帮忙看下这个VBA哪有问题

zzuhmin · 发表于 2019-10-19 13:59

用Excel实现类似邮件合并的功能（参考了大神的模板），但是不能实现循环，不知道问题出在哪里。

zzuhmin · 发表于 2019-10-19 14:03

求帮忙看下，自己做的和大神模板只有参数的改变，代码基本一致，找不出问题所在

zzuhmin · 发表于 2019-10-19 14:09

自己顶一下

wodewan · 发表于 2019-10-19 15:18

1.Sheets("Out1").[A65000].End(3).Offset(70).PasteSpecial xlAll，这句错了，看看你的A列是什么，什么都没有怎么定位最后一个单元格？改成Sheets("Out1").[B65000].End(3).Offset(70, -1).PasteSpecial xlAll 试试。

zzuhmin · 发表于 2019-10-19 15:22

wodewan 发表于 2019-10-19 15:18
1.Sheets("Out1").[A65000].End(3).Offset(70).PasteSpecial xlAll，这句错了，看看你的A列是什么，什么都 ...

没得效果额。

wodewan · 发表于 2019-10-19 15:58

zzuhmin 发表于 2019-10-19 15:22
没得效果额。

我试了可以，附件供参考

zzuhmin · 发表于 2019-10-19 16:24

wodewan 发表于 2019-10-19 15:58
我试了可以，附件供参考

可以了，我设置的那个70设置大了。导致没看到下面的。大神，太强了感谢感谢。

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

帮忙看下这个VBA哪有问题

评分