[原创]任意的拆分、合并工作薄和工作表(已升级了分类汇总功能)

pig8989 · 发表于 2017-1-16 10:57

收藏了谢谢楼主

pig8989 · 发表于 2017-1-16 10:58

我想问下这个怎么收藏

CCxiangxiang · 发表于 2017-1-21 07:20

徒然客发表于 2006-10-24 09:35
不错的源代码，改一改就可以用了。谢谢你的分享！

我是2016excel，为什么一打开具有这个VB代码的就报错啊

ww0000 · 发表于 2017-4-5 11:12

好东东，留下记号，以后再用，谢谢

我是逍遥鱼 · 发表于 2017-5-11 11:14

学习下合并拆分

springlet · 发表于 2017-6-23 14:32

拿来主义，不好意思

lrh788 · 发表于 2018-6-29 13:11

学习了！！！

13631632978 · 发表于 2018-8-29 14:29

好帖，值得学习

myvan · 发表于 2018-11-1 14:52

合并单元格，提示变量未定义。Sub 合并单元格()
Dim X, i, j
On Error GoTo ren
Dim c As Range
Application.ScreenUpdating = False
For Each c In Selection
s = s & c.Value
Next
Selection.Merge
Selection = s
Application.ScreenUpdating = True
ren:
End Sub

我是半瓶子醋 · 发表于 2018-11-27 16:36

谢谢楼主分享！

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