如何在文档中批量添加图片

前几天有人问我，几百张微信聊天记录，怎么批量插入到文档中，需要每个页面放多个聊天记录。我试了一下，vba可以很好地实现这个要求。

第一步，先读取目录，检查一下顺序：

第二步，确认顺序无误，点“是”：

第三步，执行批量插入，59张图片，只需要几秒的时间：

生成的效果如下：

VBA代码是AI帮写的，页面设置为横向，每页放三张图片，均匀排布：