中文字号和磅的关系
word样式和大纲
word中的样式和大纲级别是独立的,在样式的–>段落–>大纲级别 中可以设置样式的大纲级别
word 表格
word 表格样式重定义
对于设置新的表格样式无效果的,需要先清除样式,然后再选中新的表格样式
word 表格表头重复
Word表格跨页重复表头
word 页眉页脚
word 导出PDF 带目录书签
1. 创建的word文档必须具有目录
2. 文件另存选择PDF格式
3. 设置PDF导出选项
4. 勾选“创建书签时使用”和“标题”
word中插入符号公式灰色无法插入公式
原因是word模式有问题,启用兼容模式即可
word 设置奇偶页后,导出PDF和打印出现空白页
设置奇偶页不同后,Word在打印预览里出现空白页
对于分节的,且设置奇偶页不同的,每一小节必须是偶数页,否则在导出PDF和打印时,会在节尾插入一页,维持偶数页
解决办法是:采用插入分隔符–偶数页
高级功能
标题段落自动编号
只需3步,轻松实现Word标题段落自动编号
wps多级列表在哪找
如何对包含 Word 中的章节和附录标题的文档中的章节、附录和页面进行编号
图片
WPS中怎么把两张图片组合为一张,不是叠加
需设置图片文字环绕方式为上下环绕
怎样让Word内所有图片全部居中
word图文教程:如何对图片进行自动编号
- 图片和文字居中对齐
题注
上下标输入
布局
当文字环绕为嵌入型时,图片和文本框等无法设置相对于页面的对齐方式,其他的布局方式都可以设置对齐。
表格布局
图片布局
- 图片和文字在同一行布局的,使用嵌入型
- 图片单独成一行的,使用上下环绕型
文本框布局
需要修改文本框布局为上下环绕型布局,这样就可以修改文本框的对齐方式,可以使用居中对齐。
word 权限破解
VBA
VBA错误处理
Word(WPS文字)批量修改表格宽度
批量设置word中表格的宽度及文字对齐的VBA源代码
批量删除word图片 - 可选文字
VBA拆分Word文档
Sub set_table_width()
'
' set_table_width 宏
' 统一设置表格宽度
'-----------------------------
Dim temp_table As Table
Dim i
On Error Resume Next
'-----------------------------
'Application.ScreenRefresh = False
'If ActiveDocument.ProtectionType = wdAllowOnlyFormFields Then
' MsgBox "文档已保护,不能选中多个表格!"
' Exit Sub
'End If
'' 删除所有可编辑区域
'ActiveDocument.DeleteAllEditableRanges (wdEditorEvery)
'' 添加可编辑区域
'For Each temp_table In ActiveDocument.Tables
' temp_table.Range.Editors.Add (wdEditorEvery)
' '将表格的宽度固定为14.6cm
' temp_table.PreferredWidthType = wdPreferredWidthPoints
' temp_table.PreferredWidth = CentimetersToPoints(14.6)
For i = 1 To ActiveDocument.Tables.Count
With ActiveDocument.Tables(i)
'设置表格宽度固定为16cm
.PreferredWidthType = wdPreferredWidthPoints
.PreferredWidth = CentimetersToPoints(14.6)
'设置表格在窗口中居中对齐
.Rows.Alignment = wdAlignTabCenter
'设置第一行背景色
'.Rows(1).Shading.BackgroundPatternColor = wdColorGray125
'设置边框的可见性
.Borders(wdBorderLeft).LineStyle = wdLineStyleSingle
.Borders(wdBorderRight).LineStyle = wdLineStyleSingle
.Borders(wdBorderTop).LineStyle = wdLineStyleSingle
.Borders(wdBorderBottom).LineStyle = wdLineStyleSingle
.Borders(wdBorderHorizontal).LineStyle = wdLineStyleSingle
.Borders(wdBorderVertical).LineStyle = wdLineStyleSingle
.Borders(wdBorderDiagonalDown).LineStyle = wdLineStyleNone
.Borders(wdBorderDiagonalUp).LineStyle = wdLineStyleNone
.Borders.Shadow = False
'单元格内的的文字,水平左对齐,垂直居中
.Range.ParagraphFormat.Alignment = wdAlignParagraphLeft
.Range.Cells.VerticalAlignment = wdCellAlignVerticalCenter
End With
Next i
End Sub
Sub clear_img_text()
'
' clear_img_text 宏
' 删除图片的说明文字
'-----------------------------
Dim temp_table As Table
Dim i
On Error Resume Next
'-----------------------------
'Application.ScreenRefresh = False
'If ActiveDocument.ProtectionType = wdAllowOnlyFormFields Then
' MsgBox "文档已保护,不能选中多个表格!"
' Exit Sub
'End If
'' 删除所有可编辑区域
'ActiveDocument.DeleteAllEditableRanges (wdEditorEvery)
'' 添加可编辑区域
'For Each temp_table In ActiveDocument.Tables
' temp_table.Range.Editors.Add (wdEditorEvery)
' '将表格的宽度固定为14.6cm
' temp_table.PreferredWidthType = wdPreferredWidthPoints
' temp_table.PreferredWidth = CentimetersToPoints(14.6)
For i = 1 To ActiveDocument.InlineShapes.Count
With ActiveDocument.InlineShapes(i)
If .Type = wdInlineShapePicture Then
.AlternativeText = "snapshot" + CStr(i)
'拖拽进了的图片没有Title属性,会报错,而复制粘贴进来的图片有该属性
.Title = "snapshot" + CStr(i)
End If
End With
Next i
End Sub