wps怎么把線加粗
介紹3種方法全選Word文檔中所有表格,然后瞬間完成表格格式設(shè)置
1 Word自帶使用“宏”功能選擇,代碼如下:
Sub SelectAllTables()
Dim tempTable As Table
Application.ScreenUpdating = False
‘判斷文檔是否被保護(hù)
If Activedocument.ProtectionType = wdAllowonlyFormFields Then
MsgBox “文檔已保護(hù),此時(shí)不能選中多個(gè)表格!”
Exit Sub
End If
‘刪除所有可的區(qū)域
Activedocument.DeleteAllEditableRanges wdEditorEveryone
‘添加可區(qū)域
For Each tempTable In Activedocument.Tables
tempTable.Range.Editors.Add wdEditorEveryone
Next
‘選中所有可區(qū)域
Activedocument.SelectAllEditableRanges wdEditorEveryone
‘刪除所有可的區(qū)域
Activedocument.DeleteAllEditableRanges wdEditorEveryone
Application.ScreenUpdating = True
End Sub
如果不清楚宏使用方法,可以百度,如果覺得麻煩,建議用下面的方法
2 表格工具Word文檔自動(dòng)排版軟件
工具→表格工具→選中表格或周邊段落
"可以選中文檔中
所有表格區(qū)域
所有非表格區(qū)域
所有表格首行
所有表格首列
所有表格最后1行
所有表格前1段落(可能為表名)
所有表格后1段落(可能為表注)
還可以指定表格類型
所有表格
實(shí)線邊框表格
虛線邊框表格
橫向表格
跨頁表格
而且可以約束限于選定范圍和數(shù)量
選定表格前后的段落還可以限定長度
3 批量替換工具→批量替換→表格(Table)或前后段落
"目標(biāo)位置限制
=0處理表格
>0處理表格前的行,表格前1行=1
<0處理表格后的行,表格后1行=-1
每個(gè)找到的目標(biāo)會(huì)自動(dòng)加上突出顯示
再用
工具→顏色工具→選中所有突出顯示
進(jìn)行全選
然后可以快速設(shè)置Word文檔中所有表格字體、段落、樣式等