word 文档中表格批量居中 宏命令
Sub 表格批量居中()
'
' 表格批量居中 宏
'
'
For i = 1 To ActiveDocument.Tables.CountActiveDocument.Tables(i).Rows.Alignment = wdAlignRowCenterNext i
End SubSub 表格自动对齐窗口()
'
' 表格自动对齐窗口 宏
'Dim tempTable As TableApplication.ScreenUpdating = FalseFor Each oTable In ActiveDocument.TablesoTable.AutoFitBehavior (wdAutoFitWindow)NextMsgBox "完成！！"Application.ScreenUpdating = True
End Sub
本文来自互联网用户投稿，文章观点仅代表作者本人，不代表本站立场，不承担相关法律责任。如若转载，请注明出处。 如若内容造成侵权/违法违规/事实不符，请点击【内容举报】进行投诉反馈！