word文档批量选中图片宏代码怎么写？

以下是 Word 文档中批量选中图片的 VBA 宏代码：

Sub SelectAllPictures()
  Dim oShape As Shape
  For Each oShape In ActiveDocument.Shapes
    If oShape.Type = msoPicture Then
      oShape.Select msoTrue
    End If
  Next
End Sub

您可以在 Word 中打开 "开发工具"，然后在 "模块" 窗口中粘贴并运行上面的代码。代码将选择文档中的所有图片。