轻轻一点，工作簿自动合并。

lpzxhjp · 发表于 2011-10-31 14:47

下载了，学习学习，谢谢

cuken · 发表于 2011-11-4 15:29

本帖最后由 cuken 于 2011-11-4 15:31 编辑

zbxixi_cn 发表于 2010-9-24 01:00
老师，如何实现在汇总表中从第3行或第四行开始显示汇总结果，即不从第二行开始显示？

AK.Sheets(i).Range("a3:h" & aRow).Copy ThisWorkbook.Sheets(1).Range("a" & tRow)
红色部分改成你想要的第几行
清除按钮的代码也要相应的改成你需要的第几行
Sub Çå³ý()
Rows("3:1000").Clear
End Sub

AVEL · 发表于 2011-11-4 15:51

感谢分享。

JLF2003 · 发表于 2011-11-4 16:25

简单，实用。学习了。

nliang2011 · 发表于 2011-11-4 16:40

下载，学习

zhao99315 · 发表于 2011-11-9 04:14

我要好好研究研究

sakana01 · 发表于 2011-11-17 14:40

很实用，刚好有工作簿内各工作表合并的需求。和一个个复制粘贴的办法比起来，科学技术真是生产力啊……

wanghan96 · 发表于 2011-12-8 11:49

好难啊，怎么学的完啊

zkwjg · 发表于 2011-12-10 18:24

感谢分享，这个很实用！学习了！

sheng1900 · 发表于 2011-12-11 11:28

正不错，学习了

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

[推荐] 轻轻一点，工作簿自动合并。

浏览过的版块