Vba批量提取word文件名和每个word的总页数

Vba批量提取word文件名和每个word的总页数

通过vba进行遍历，然后把文件名读取下来，并同时通过word的dom对象打开word读取页数