如何使插入表格的字居中

Question

我用如下代码在表格的第八行第一列插入字符串变量bt,请问如何使bt居中?
Set mytable = ActiveDocument.Tables(1)
With mytable
.Cell(8, 1).Range.InsertAfter bt
 With .Cell(8, 1).Range.Font
 .Bold = False
 .name = "方正小标宋简体"
 .Size = "16"
 End With
End With

Answer 1

objSheet 是 excel.worksheet 对象：
objSheet.Range("A1:B1").HorizontalAlignment = -4131 '左对齐
objSheet.Range("A1:B1").HorizontalAlignment = -4108 '中间对齐
objSheet.Range("A1:B1").HorizontalAlignment = -4152 '右对齐