合并两个EXCEL中的SHEET表[已解决]

heroxianf · 发表于 2016-5-23 12:00:26

本帖最后由 heroxianf 于 2016-5-26 09:01 编辑

我查了函数没有操作SHEET合并的，我想实现，1.xlsx中的sheet1 覆盖 2.xlsx中的sheet1，请坛友帮帮想想法子~

附件是在学习中论坛搜索到的老版本EXCEL UDF补全版本，有需要的朋友慢慢研究~

kk_lee69 · 发表于 2016-5-23 17:41:27

回复 1# heroxianf

Sheets("工作表1").Select
Sheets("工作表1").Copy Before:=Workbooks("2.xlsx").Sheets(1)
Windows("1.xlsx").Activate

heroxianf · 发表于 2016-5-23 18:00:28

回复 2# kk_lee69

我回去下个老版本的EXCEL UDF版本试试，谢谢了。

h20040606 · 发表于 2016-5-24 06:37:54

回复 3# heroxianf

我一般也是就像 lee69那样，先录制vba,然后改造成au3

heroxianf · 发表于 2016-5-24 07:09:29

回复 4# h20040606

最近用表格多一点，在学习，有时候改不来！

heroxianf · 发表于 2016-5-24 09:45:23

回复 2# kk_lee69

KK 这个宏也不是覆盖替换，二是重命名，是不是要自己删除原有的工作薄在命名过来呢？

kk_lee69 · 发表于 2016-5-24 21:13:22

回复 6# heroxianf

新增一個再刪除原本的不就等同覆蓋??

h20040606 · 发表于 2016-5-25 10:24:11

我的建议是新建一个excel文件，将需要的sheet页复制过来。这样也有个备份。

heroxianf · 发表于 2016-5-25 11:01:13

回复 8# h20040606

嗯，我正在向如何复制过来SHEET名称保持不变~

heroxianf · 发表于 2016-5-25 14:25:33

回复 7# kk_lee69

KK 我找的这个老版本的EXCEL UDF不支持保存格式为XLSX 如果你那里支持能否分享一下。

kk_lee69 · 发表于 2016-5-25 21:34:06

回复 10# heroxianf

我的版本是也是舊版本不支援 XLSX 不過

理論上只是存檔格式問題可以自己改才對

h20040606 · 发表于 2016-5-26 07:19:01

EXCEL保存为xlsx格式
$oExcel.saveas(文件全路径名,51)

heroxianf · 发表于 2016-5-26 08:58:58

回复 12# h20040606

谢谢大家，对EXCEL操作貌似有进步了一点点~

		自动登录	找回密码
密码			加入

[效率算法] 合并两个EXCEL中的SHEET表[已解决]