none
如何将Word文档中图片批量的设置成嵌入式图片 RRS feed

  • 问题

  • 我的一份word2016文档中包含了30几张图片,是由程序自动加入的,图片版式是浮于文字上方的,我想把图片版式批量修改成嵌入式版式,于是写了个VBA宏去处理,但每次执行宏以后,总是有那么几副图片的版式无法修改成功,但其它的可以。搞了好几天了,也没法成功,希望得到帮助,谢谢了。代码如下:

    Sub ConvertThem()
      Dim oShape As Shape
      On Error Resume Next
      For Each oShape In ActiveDocument.Shapes
        oShape.Select
        oShape.ConvertToInlineShape
        Selection.Range.ParagraphFormat.Alignment = wdAlignParagraphCenter
      Next
    End Sub
    2021年1月25日 0:59

全部回复

  • 你好,

    欢迎来到TechNet论坛,但是我们负责Office桌面应用程序的一般性使用问题。

    根据你的描述,你的问题与VBA宏代码相关,建议你在Microsoft Q&A论坛上加上tag“office-vba-dev”发帖。
    注意:Microsoft Q&A论坛支持语言为英文,请用英文发帖。

    另外,后期如果你有Office客户端的使用问题,欢迎在这个论坛发帖。
    感谢你的理解。

    Regards,

    Erin


    如果以上回复对您有所帮助,建议您将其标记为答复。如果您对我们的论坛支持有任何的建议,可以通过此邮箱联系我们:tnmff@microsoft.com.

    2021年1月25日 8:40
  • 你好,

    请问有没有在Q&A论坛上发帖呢?问题目前进展怎么样呢?

    如果后期有解决方案,也可以在此线程中分享。

    Regards,

    Erin


    如果以上回复对您有所帮助,建议您将其标记为答复。如果您对我们的论坛支持有任何的建议,可以通过此邮箱联系我们:tnmff@microsoft.com.

    2021年1月28日 10:02