word文档表格怎么改磅值

1.word的表格怎么设置行高为磅数

word的表格设置zhidao行高为磅数的具体步骤如下：

我们需要准备的材料分别是：电脑、word文档。

1、首先我们打开需要编辑的word文档，点击打开文件中的“选项”。

2、然后我们在弹出来的窗口中点击打开高级中的“度版量单位”，选权择“磅”，回车确定。

3、然后我们右键单击表格打开表格属性，点击行，即可设置了。

2.在WORD中所做的表格 如何调整表格线的宽度(磅值)?

工具/原材料

word2016版、电脑。

1、打开电脑找到并双击打开word2016版文档软件；

2、双击打开以后，先选中需要设置的表格并鼠标右键选择表格属性的命令；

3、点击表格属性命令以后，在弹出的对话框中找到并点击边框和底纹的命令；

4、点击边框和底纹以后，在弹出的界面框中即可对宽度进行设置更改。

3.如何查看word表格线磅值

选中表格，会出现表格工具选项卡，点击设计。

出现如图后，点击边框。

这里面就能看见表格线磅值以及样式。

4.如何调整word表格行高

首先打开自己需要修改的word表格文档

如何调整word表格行高

如何调整word表格行高

右键点击你要修改的表格单元格，在弹出的菜单选择表格属性

如何调整word表格行高

在弹出的窗口选择行，然后就可以看到修改行高的选项了

如何调整word表格行高

下图就是上图选择后修改好的，然后我们点击确定即可。

如何调整word表格行高

5.word文档中有文字,有表格,如何整体修订

用vba代码可以实现。

下面这段代码是设置文字格式的，根据标题序号的不同，设置不同的格式。供参考！Private Sub CommandButton4_Click（) '排版格式 Dim T_WORD As String Dim RNG As Range Dim mypra As Paragraph Set mydic = CreateObject("Scripting.Dictionary") '二级标题字符 mydic.Add "一"， 1 mydic.Add "二"， 1 mydic.Add "三"， 1 mydic.Add "四"， 1 mydic.Add "五"， 1 mydic.Add "六"， 1 mydic.Add "七"， 1 mydic.Add "八"， 1 mydic.Add "九"， 1 mydic.Add "十"， 1 T_WORD = TextBox1.Text 导出路径文件名 = ThisDocument.Path & "\" & T_WORD Set mydoc = Documents.Open（导出路径文件名） mydoc.Activate Selection.WholeStory '选中全部 Selection.ClearFormatting '清除全部格式 zz = 0'For Each mypra In ActiveDocument.Paragraphs For Each mypra In mydoc.Paragraphs If Not mypra.Range.Information(wdWithInTable) = True Then '非表格段落 zz = zz + 1 MYSTR = mypra.Range.Text mychar = Mid(MYSTR, 1, 1) 'mypra.Select If zz = 1 Or zz = 2 Then '一级标题 黑体 小二 是 居中 1行 1行 固定值18磅 无 With mypra .Range.Font.Name = "黑体" .Range.Font.Size = 18 '（小二高度18磅） .Range.Font.Bold = True .Range.ParagraphFormat.Alignment = .Range.ParagraphFormat.LineUnitBefore = 1 .Range.ParagraphFormat.LineUnitAfter = 1'.Range.ParagraphFormat.SpaceBefore = 10.5 '段前 1123修改为5号10.5磅 '.Range.ParagraphFormat.SpaceAfter = 10.5 '段后 .FirstLineIndent = 0 '首行缩进无 .LineSpacingRule = wdLineSpaceExactly '.LineSpacingRule = wdLineSpace1pt5 .Range.ParagraphFormat.LineSpacing = 18 '行间距18磅 End With Else If mydic.Exists(mychar) Then '二级标题 黑体 小四 是 两端对齐 1行 1行 固定值18磅 首行缩进2字符 With mypra .Range.Font.Name = "黑体" .Range.Font.Size = 12 .Range.Font.Bold = True .Range.ParagraphFormat.Alignment = .Range.ParagraphFormat.LineUnitBefore = 1 .Range.ParagraphFormat.LineUnitAfter = 1 '.Range.ParagraphFormat.SpaceBefore = 10.5 '段前 小四高度=12磅 1123修改为5号10.5磅 '.Range.ParagraphFormat.SpaceAfter = 10.5 '段后 '.FirstLineIndent = CentimetersToPoints(1.27) '首行缩进2字符 0.635*2=1.27 .FirstLineIndent = CentimetersToPoints(0.74) '首行缩进2字符 0.74 和正文相同 ' .LineSpacingRule = wdLineSpace1pt5 .LineSpacingRule = wdLineSpaceExactly .Range.ParagraphFormat.LineSpacing = 18 '行间距18磅 End With Else '正文 宋体 五号 否 两端对齐 0行 0.5行 固定值18磅 首行缩进2字符 With mypra .Range.Font.Name = "宋体" .Range.Font.Size = 10.5 .Range.Font.Bold = False .Range.ParagraphFormat.Alignment = '.Range.ParagraphFormat.SpaceBefore = 0 '段前0 '.Range.ParagraphFormat.SpaceAfter = 5.25 '段后0.5*10.5=5.25 .Range.ParagraphFormat.LineUnitBefore = 0 .Range.ParagraphFormat.LineUnitAfter = 0.5.FirstLineIndent = CentimetersToPoints(0.74) '0.37*2=0.74 .LineSpacingRule = wdLineSpaceExactly .Range.ParagraphFormat.LineSpacing = 18 '行间距18磅 .Alignment = End With If zz = 3 Then '第3段落居中 With mypra .Range.ParagraphFormat.Alignment = End With End If End If End If End If Next mypra mydoc.Save mydoc.Close False '关闭word文档 Set mydoc = Nothing '清空工作簿项目 End Sub。