WordVBA 提取文檔中嵌入的Excel文件
網(wǎng)友提問

回答網(wǎng)友問題
我在桌面上準(zhǔn)備了 文件1、2、3、4 四個(gè)文件,其中有2個(gè)是excel文件

我將他們都拖拽到? ? 有嵌入文件的word.docx 中? 如下圖

現(xiàn)在要提取其中的Excel文件。
一、先說網(wǎng)上的傳說
網(wǎng)上傳說,你把文件復(fù)制一份,把后綴名改成zip或rar等,然后解壓


如果不顯示后綴,請打開 C盤,依次操作,把隱藏已知文件類型擴(kuò)展名的勾取消

然后解壓,看大小也能知道在哪個(gè)目錄中

進(jìn)入word目錄中還有一個(gè)二級(jí)目錄

你嵌入的文件都在這里

且先不說他的文件名不對,這是小事。PPTX? 和? docx 文件你能打開,你試試 xlsx文件你能打開不?你能不能打開我不清楚,反正我打不開。
二、傳說不靈,我們說代碼
我想把所有的內(nèi)嵌Excel文件以xlsx為例都導(dǎo)出到 C:\孫興華 這個(gè)文件夾中
友情提示:我以xlsx為例,你是xlsx和xls都有,加個(gè)or就行了,如果還有xlsm再加個(gè)or。如果我這句話,聽不懂,那一定要回去重看ExcelVBA第二季
運(yùn)行后

寫在最后:Word我不熟悉,不知道還有沒有其它沒想到的地方,如果在使用中發(fā)現(xiàn)問題,可以隨時(shí)聯(lián)系我,我再想解決方案。建議使用office版本不要低于2016,推薦office365,wps可能無法運(yùn)行本代碼。

ExcelVBA與WordVBA:https://www.bilibili.com/video/BV1rt4y1a72y
標(biāo)簽: