如何处理EXCEL相同单元格合并不跨页

haha42586 · 发表于 2012-10-26 22:02

比如一个EXCEL表格（如附件中的“原表.xls”），通过列中相同单元格合并，可以达到附件中的“错误.xls”的效果，但由于合并后的单元格跨页，未封边，不美观。我想当合并单元格跨页时以页为界自动合并为两个单元格（如附件中的“结果.xls”），VBA如何处理？谢谢啦！

实例.rar (7.17 KB, 下载次数: 34)

hustnzj · 发表于 2012-10-27 12:17

找到分页符所在位置

wj2368 · 发表于 2012-10-27 13:53

........................

haha42586 · 发表于 2012-10-27 19:59

wj2368 发表于 2012-10-27 13:53
........................

出现运行错误9：下标越界

haha42586 · 发表于 2012-10-27 20:00

wj2368 发表于 2012-10-27 13:53
........................

谢谢，但出现运行错误9：下标越界

haha42586 · 发表于 2012-10-27 20:02

谢谢，但出现运行错误9：下标越界

wj2368 · 发表于 2012-10-27 20:28

haha42586 发表于 2012-10-27 20:02
谢谢，但出现运行错误9：下标越界

2010下正常，你是在我上传的附件中出现的吗

haha42586 · 发表于 2012-10-28 22:04

我是在2003版中测试的，请问是什么原因造成的

haha42586 · 发表于 2012-10-28 22:22

对不起，，我昨天测试的是“原表.xls”。刚才重新测试了一下，对于“错误.xls”测试是可行的。能不能请您帮我修改一下VBA源码，在“原表.xls”中运行VBA达到“结果.xls”的效果。即“直接合并EXCEL相同单元格但不跨页”。深表感谢！

haha42586 · 发表于 2012-10-28 22:25

最好解释一下代码，谢谢

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

[求助] 如何处理EXCEL相同单元格合并不跨页