如何使用VBA在WORD中的单元格中格式化字体大小等？

Question

我当前正在运行此代码，但无法运行。

ObjTable.Cell(3,2).Range.Text = "hello"
objTable.Cell(3,2).range
     .Font.Name = "Arial"
     .Font.Size = "14"

仅出现单词，但不显示单词的格式。

Answer 1

您需要将.Font.Name和.Font.Size封装在with语句中，如下所示：

ObjTable.Cell(3,2).Range.Text = "hello"

With objTable.Cell(3,2).Range
     .Font.Name = "Arial"
     .Font.Size = "14"
End With

有关更多信息，请参见https://docs.microsoft.com/en-us/office/vba/Language/Reference/User-Interface-Help/with-statement。

Answer 2

效率更高：

With objTable.Cell(3,2).Range
  .Text = "hello"
  .Font.Name = "Arial"
  .Font.Size = "14"
End With