none
word vba 使用AddOLEControl时,当要插入控件的页面存在软回车(shift+enter/ctrl+enter)位置不准确 RRS feed

  • 常规讨论

  • word的vba编程,使用AddOLEControl时,当要插入控件的页面存在软回车(shift+enter/ctrl+enter)位置不准确,控件跳到上面的页面了。

    Sub ctrl()
        ActiveDocument.ToggleFormsDesign
        Dim rg As Word.Range
        Set rg = Selection.GoTo(wdGoToPage, wdGoToAbsolute, 2)
        ActiveDocument.Shapes.AddOLEControl "forms.checkbox.1", 100, 100, , , rg
    End Sub

    当运行上面代码时,效果如下图:

    有什么办法让控件准确地插入到第二页的相应位置上?

    2012年2月1日 3:36

全部回复