移到文本框的底部

Question

有没有办法以编程方式跳转到TextBox形状的底部（最后一行）？如果没有，可以使用纯文本内容控件实现相同的目的吗？

以下对我没用：

ActiveDocument.Shapes("Text Box 2").TextFrame.TextRange.Select
Selection.EndKey WdUnits.wdStory, False

Answer 1

如果您正在使用选择（我不会），您可以使用：

ActiveDocument.Shapes("Text Box 2").TextFrame.TextRange.Characters.Last.Select

请注意，就像文档中的任何其他位置一样，空范围中的最后一行位于该范围的顶部。