代码之家  ›  专栏  ›  技术社区  ›  Kevin

VBA Word o将文本框文本/段落垂直对齐设置为“居中”

  •  0
  • Kevin  · 技术社区  · 5 年前

    但是我找不到任何设置来将文本的垂直对齐方式设置为上/中/下。功能区上有一个垂直对齐按钮来设置该属性,但我无法通过对象检查器、智能感知或网络搜索找到它。我试图录制一个宏,但宏中唯一出现的行是选择文本框的VBA行。没别的了。:-(

    功能区按钮在“设置文本方向”选项旁边,但我也找不到该设置的VBA。我也尝试了Textframe2属性,但是没有看到垂直对齐。

       tbox.TextFrame.TextRange.ParagraphFormat.Alignment = wdAlignParagraphRight
    
    WdVerticalAlignment enumeration (Word):
    Name                 Value  Description
    wdAlignVerticalBottom   3   Bottom vertical alignment.
    wdAlignVerticalCenter   1   Center vertical alignment.
    wdAlignVerticalJustify  2   Justified vertical alignment.
    wdAlignVerticalTop      0   Top vertical alignment.
    

    有人知道我需要设置为文本框形状内文本垂直对齐的属性的语法吗?谢谢你

    0 回复  |  直到 5 年前
        1
  •  1
  •   Cindy Meister    5 年前

    财产就是财产 TextFrame.VerticalAnchor MsoVerticalAnchor

    例如:

    ActiveDocument.Shapes(1).TextFrame.VerticalAnchor = msoAnchorMiddle