ExcelVBA 不打開word的情況下批量獲取頁碼
網(wǎng)友提問:

回答網(wǎng)友問題:
知識點(diǎn)在這個視頻里講的,不只是頁碼,跟文件有關(guān)的東西都可以拿到
https://www.bilibili.com/video/BV1dQ4y1d7fj
例如,我在? ? C:\孫興華? ? 這個文件夾里有? N個word文檔
關(guān)于每個word文檔有幾頁,不用打開就能知道,對著文件點(diǎn)鼠標(biāo)右鍵~屬性
如下圖所示

關(guān)于文件的信息 我們之前講過如何獲取

以我們的? 李四.docx? 為例
新建一個Excel工作簿,在VBE編譯器中復(fù)制如下代碼
運(yùn)行后,文件夾里會多一個? 1.txt? 的文本

打開它,里面所有信息對應(yīng)的參數(shù)就都體現(xiàn)出來了,其中頁碼對應(yīng)的編號是

好了,上面就是告訴你這個 157? 是怎么來的,是我講過的知識。后面的代碼解決你的問題
把剛才的1.txt 刪了吧 ,沒用了

然后,配合我們在Access里講的FSO對象就可以了


在新建的Excel工作簿的VBE編碼器中,復(fù)制以下代碼
運(yùn)行結(jié)果:


ExcelVBA和wordVBA:https://www.bilibili.com/video/BV1rt4y1a72y
AccessVBA:https://www.bilibili.com/video/BV1tf4y117Sh
標(biāo)簽: