yy一级毛片免费视频-yyyyyy高清成人观看-yy6080理aa级伦大片一级毛片-yy4080午夜理论一级毛片-色吊丝在线观看国产-色的视频在线观看免费播放

人工服務(wù) 離線下載

Word批量操作表格的方法

轉(zhuǎn)轉(zhuǎn)大師PDF轉(zhuǎn)換器

支持40多種格式轉(zhuǎn)換,高效辦公

我們?cè)谑褂肳ord排版編寫書籍時(shí)候,可能會(huì)帶有許多表格,上百,甚至上千個(gè)表格都是有可能的。這么多的表格對(duì)于后期的樣式修改是非常不利的,有什么好的方法能夠一次性修改文檔中所有的表格,將其統(tǒng)一樣式呢?今天為大家分享一個(gè)不錯(cuò)的方法,可以幫助我們快速搞定。

開(kāi)始操作

1、利用宏選擇所有表格。首先,我們進(jìn)入【開(kāi)發(fā)工具】-【Visual Basic】將下列代碼復(fù)制進(jìn)去(該宏的主要作用是,可以讓你一次選中文檔中所有的表格)。然后,在【宏】中點(diǎn)擊【運(yùn)行】。
插入批量代碼
復(fù)制列橫線內(nèi)代碼:
======================================================
Sub 批量修改表格()

    Dim tempTable As Table
    Application.ScreenUpdating = False
    If ActiveDocument.ProtectionType = wdAllowOnlyFormFields Then
        MsgBox "文檔已保護(hù),此時(shí)不能選中多個(gè)表格!"
        Exit Sub
    End If
    ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
    For Each tempTable In ActiveDocument.Tables
        tempTable.Range.Editors.Add wdEditorEveryone
    Next
    ActiveDocument.SelectAllEditableRanges wdEditorEveryone
    ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
    Application.ScreenUpdating = True
    
End Sub
=====================================================
代碼結(jié)束,只需復(fù)制雙橫線內(nèi)的代碼即可;

2、修改樣式。運(yùn)行我們剛剛錄入進(jìn)去的宏,即可一次選中文檔中所有表格,此時(shí),我們?cè)凇驹O(shè)計(jì)】-【表格樣式】-【修改表格樣式】,在這里面我們可以隨意的設(shè)置表格中內(nèi)容的格式樣式。
修改表格樣式

3、表格屬性。不僅如此,我們還能夠通過(guò)【右鍵】-【表格屬性】,進(jìn)入后,我們可以對(duì)其中單元格的高度、寬度等再次統(tǒng)一設(shè)置。
批量設(shè)置表格屬性
假如你學(xué)習(xí)到了這個(gè)新技能不妨轉(zhuǎn)發(fā)推薦給你的小伙伴。并動(dòng)動(dòng)小指頭收藏,以免下次走丟。

我們將定期更新Word、Excel、PPT等操作技巧。pdf轉(zhuǎn)換器供在線免費(fèi)的PDF轉(zhuǎn)word、PDF轉(zhuǎn)Excel、PDF轉(zhuǎn)PPT服務(wù)。