从VBA Word中的公式编辑器中转义

时间:2015-03-16 18:51:05

标签: vba ms-word

我使用代码

以编程方式在MS Word中打开公式编辑器
Set objRange = Selection.Range
Set objRange = Selection.OMaths.Add(objRange)

Selection.TypeText Text:="a^2 + b^2 = c^2"
Selection.TypeText Text:="1/2"
Set objEq = objRange.OMaths(1)
objEq.Type = wdOMathInline
objEq.BuildUp

现在我想退出公式编辑器,以便输入一些常规文本。我找不到一种直截了当的方式。我有一个解决方法,这实际上意味着击中输入然后退回一次。

Selection.TypeParagraph
Selection.MoveLeft Unit:=wdCharacter, Count:=1

但是,有没有更清洁的方式?

感谢。

1 个答案:

答案 0 :(得分:0)

好的,它实际上非常简单。型

  Selection.MoveRight Unit:=wdCharacter, Count:=1
等式建立后