qq_40178842的博客

【代码】VBA 去除选中内容中的（）和其中的内容 并将删除后的内容添加到下一列。

链接：https://pan.baidu.com/s/1F0kkBVkvpcRsx1GfJR3-8w。选中内容之后 按快捷键 ctrl + e 打开窗口。--来自百度网盘超级会员V6的分享。

功能介绍：修改文件下所有工作簿中第一个表单的名 为 工作簿的名字。

和上一篇的合并工作簿配合使用。

【代码】VBA 删除工作簿中所有表格。

result = MsgBox("已将 " & workBookName & " 中表格合并 是否继续合并？filePath = desktopPath & "\合并后的工作簿.xlsx" ' 可以根据需要修改文件名和扩展名。'folderPath = "C:\Users\Administrator\Desktop\新建文件夹\"folderPath = InputBox("文件夹路径", "合并", folderPath)功能 ： 将指定文件夹下所有工作簿中表格 ，合并到一个工作簿中并保存到桌面。