word 有多个表格根据表格数据类型设置不同对齐方式

wanwanbin

RT: 以其中一个表格为例

word表格中的数据，文字居中，数字居右，百分比居左。
以下为原始原始表格
表格1

序号	姓名	项目	性别	年龄	增长比例
1	张三	队里	男	25	19.1%
2	李四	开发	女	28	-29%

表格2

序号	年龄	姓名	工资	性别	增长比例
1	25	张三	1000.33	男	19.1%
2	28	李四	22222	女	-29%

需实现以下排版：

序号	姓名	项目	性别	年龄	增长比例
1	张三	队里	男	25	19.1%
2	李四	开发	女	28	-29%

序号	年龄	姓名	工资	性别	增长比例
1	25	张三	1000.33	男	19.1%
2	28	李四	22222	女	-29%

vbee

选择整列，这属于基本操作，不需要宏.
既然是表格，就不需要判定什么数据类型，学过ACCESS表都知道。



直接处理表格对齐的宏如下：
Sub 宏2()

ActiveDocument.Tables(1).Select
    Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
ActiveDocument.Tables(1).Columns(6).Select
    Selection.ParagraphFormat.Alignment = wdAlignParagraphLeft
ActiveDocument.Tables(1).Columns(5).Select
    Selection.ParagraphFormat.Alignment = wdAlignParagraphRight
ActiveDocument.Tables(1).Rows(1).Select
    Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter

End Sub

wanwanbin

一个word有多个表格，表格每列的数据不固定。这个怎么处理

wanwanbin

vbee 发表于 2022-11-15 11:13
选择整列，这属于基本操作，不需要宏.
既然是表格，就不需要判定什么数据类型，学过ACCESS表都知道。

一个word有多个表格，表格每列的数据不固定。这个怎么处理

wanwanbin

vbee 发表于 2022-11-15 11:13
选择整列，这属于基本操作，不需要宏.
既然是表格，就不需要判定什么数据类型，学过ACCESS表都知道。

一个word有多个表格，表格每列的数据不固定。这个怎么处理

vbee

一个word有多个表格，表格每列的数据不固定。
加个循环就好了

wanwanbin

vbee 发表于 2022-11-16 10:14
一个word有多个表格，表格每列的数据不固定。
加个循环就好了

谢谢，大佬，完美解决