VB设置WORD表格单元格属性

[ohye1188]

用VB在WORD中画了一个表格，接下来想分别设置每个单元格不同的格式，比如单元格宽度、高度、字体、单元格边距、字体方向等等，有大神指导相关代码吗？谢谢啦

[ohye1188]

引用 2 楼 zhao4zhong1 的回复:

在Word中开始记录宏，手动完成所需功能，结束记录宏，按Alt+F11键，查看刚才记录的宏对应的VBA代码。

试了，没有办法录制调整单元格宽度的代码

[赵4老师]

Sub Macro1()
'
' Macro1 Macro
' 宏在 2018-01-19 由 [e-mail] 录制
'
    Selection.Range.Cells(1).PreferredWidthType = wdPreferredWidthPoints
    Selection.Range.Cells(1).PreferredWidth = CentimetersToPoints(3)
End Sub

[of123]

做过，找不到原来的代码作例子了。其实记录宏就可以得到这些设置代码。

[舉杯邀明月]

Word中，在“录制宏”时，有些操作不方便。感觉Excel的“宏”比较友好一些…… 楼主找一下Word VBA的一些资料来看看吧。

[赵4老师]

在Word中开始记录宏，手动完成所需功能，结束记录宏，按Alt+F11键，查看刚才记录的宏对应的VBA代码。