word選擇所有表格

1、竭誠(chéng)為您提供優(yōu)質(zhì)文檔 /雙擊可除第1頁(yè)共 15 頁(yè)word 選擇所有表格篇一：批量操作word表格一、批量選擇word表格subkonggs()dimmytableastableapplication.screenupdating=FalseForeachmytableinactivedocument.tablesmytable.Range.editors.addwdeditoreveryone nextactivedocument.selectalleditableRanges(wdeditoreveryone)activedocument.deletealleditableRanges(w

2、deditorever yone)application.screenupdating=trueendsub二、實(shí)現(xiàn)同時(shí)將一個(gè)word文檔中的所有表格執(zhí)行“自動(dòng)調(diào)整一一根據(jù)窗口調(diào)整表格”操作第2頁(yè)共 15 頁(yè)subwww()dimodocasdocumentdimotableastablesetodoc=documents.open(d:testsr.doc)指定文件路徑Foreachotableinodoc.tablesotable.autoFitbehavior(wdautoFitwindow)根據(jù)窗口調(diào)整內(nèi)容nextmsgbox完成！”endsub三、word文檔中選擇所有表格假如wor

3、d文檔中有多個(gè)表格，需要一次性同時(shí)選擇做一些設(shè)置，該如何運(yùn)用簡(jiǎn)便方法做到呢？方法如下：1.按alt+F11鍵，開(kāi)啟Vba程序窗口2.菜單欄-“插入”菜單宀“模塊”，在其中放入如下代碼?；蛘咪浿坪暌部梢?。optionexplicitsubselectalltable()dimtemptableastable第3頁(yè)共 15 頁(yè)application.screenupdating=FalseForeachtemptableinactivedocument.tablestemptable.Range.editors.addwdeditoreveryonenextactivedocument.selec

4、talleditableRangeswdeditorevery oneactivedocument.deletealleditableRangeswdeditorevery oneapplication.screenupdating=trueendsub3.運(yùn)行代碼就可以選中所有表格了四、把所有表格則設(shè)置縮進(jìn)為0,居中對(duì)齊subaa_no_indent_table表縮進(jìn)為0()dimssastableaa_no_indent_table表縮進(jìn)為0Foreachssinactivedocument.tablesss.Range.paragraphFormat.characterunitFirst

5、lineindent=0取消字符單位的首行縮進(jìn)ss.Range.paragraphFormat.Firstlineindent=0取消取行縮進(jìn)next endsub第4頁(yè)共 15 頁(yè)這個(gè)不用宏，直接用格式刷就能辦到。弄好了一個(gè)格子的坐縮進(jìn)，雙擊格式刷，刷其他的所有（拉黑）即可。下面的表格也帶著刷子去操作一下就行了。篇二：wordVba全選文檔內(nèi)所有表格的代碼sub全選所有表格（）全選所有表格macro dimtemptableastableapplication.screenupdating=False判斷文檔是否被保護(hù)tectiontype=wdall

6、owonlyFormFieldsthenmsgbox文檔已保護(hù)，此時(shí)不能選中多個(gè)表格！exitsub endif刪除所有可編輯的區(qū)域activedocument.deletealleditableRangeswdeditoreveryone添加可編輯區(qū)域第5頁(yè)共 15 頁(yè)Foreachtemptableinactivedocument.tablestemptable.Range.editors.addwdeditoreveryone next選中所有可編輯區(qū)域activedocument.selectalleditableRangeswdeditoreveryone刪除所有可編輯的區(qū)域acti

7、vedocument.deletealleditableRangeswdeditoreveryoneapplication.screenupdating=trueendsub篇三：word中表格編輯技巧大全word中表格編輯等技巧設(shè)計(jì)斜線表頭將插入點(diǎn)定位在單元格中，單擊“表格-繪制斜線表頭” 命令，出現(xiàn)對(duì)話框，單擊“表頭樣式”下拉菜單選擇一種樣 式 （共有5種可選擇） ， 分別填入“行標(biāo)題”（右上角的項(xiàng)目）“列標(biāo)題”（左下角的項(xiàng)目）和“數(shù)據(jù)標(biāo)題”（中間格的項(xiàng)目）以及“字體大小”等，最后單擊“確定”退出。刪除斜線表 頭的方法是，單擊要?jiǎng)h除的斜線表頭，當(dāng)周圍出現(xiàn)選定標(biāo)記 時(shí)，按del鍵即可刪除該斜

8、線表頭。自由修改斜線表頭斜線表頭繪制好后，如果改變字號(hào)，或者調(diào)整斜線位置，斜線表頭便出現(xiàn)諸如字與字互相疊壓或線條移動(dòng)等不匹配 的情況，往往令許多人感到束手無(wú)策。其實(shí)，我們可利用word第6頁(yè)共 15 頁(yè)的繪圖功能加以調(diào)整，具體作法是：1.選中該表頭（其實(shí)表格斜線是由線條組合在一起的圖形），使之周圍出現(xiàn)8個(gè)控點(diǎn)；2.在“繪圖工具欄”上單擊“繪圖”按鈕， 在彈出的菜 單中選擇“取消組合”命令，并在斜線表頭所在的單元格之 外的區(qū)域單擊（即取消選定狀態(tài)）；3.這時(shí)表頭中的線條和文字（其實(shí)是文本框）均成為獨(dú) 立可調(diào)整狀態(tài)，我們可以任意調(diào)整表頭的線條和每一個(gè)文字 的位置，直到滿意為止；4.按shift鍵，

9、依次選擇每個(gè)線條和每個(gè)文字塊；5.再次在“繪圖工具欄”上單擊“繪圖”按鈕，選擇“組 合”。在上面第三步中，你還可能遇到另一種令人頭疼的事情：那就是雖然可獨(dú)立移動(dòng)斜線位置，但就是移動(dòng)不到準(zhǔn)確的位 置，或者說(shuō)誤差非常大。這時(shí)，你可嘗試如下的步驟：1.選中該表頭；2.在“繪圖工具欄”上單擊“繪圖”按鈕，選擇“繪圖網(wǎng)格”，彈出“繪圖網(wǎng)格”對(duì)話框（圖2）；圖23.在“繪圖網(wǎng)格”對(duì)話框中將“水平間距”和“垂直間距”均調(diào)整成最小值，然后單擊“確定”，表頭中的內(nèi)容便第7頁(yè)共 15 頁(yè)可任意調(diào)整大小、位置了。143把文字轉(zhuǎn)換成表格選中需要轉(zhuǎn)換的文字，單擊“表格-轉(zhuǎn)換-文本轉(zhuǎn)換成 表格”命令，設(shè)置好需要轉(zhuǎn)換的列數(shù)

10、、行數(shù)和套用的格式， 在“文字分隔位置”中選中文字分隔符（圖3）,按“確定”按鈕就可以把文字轉(zhuǎn)換成表格。圖3144把表格轉(zhuǎn)換成文字選中表格，單擊“表格-轉(zhuǎn)換-表格轉(zhuǎn)換成文本” 命令， 在打開(kāi)的對(duì)話框中選好文字分隔符（圖4）,單擊“確定”按 鈕即可。圖41.4.5快速選定整張表格按“alt+5（數(shù)字鍵盤上的數(shù)字，且numlock鍵處于關(guān) 閉狀態(tài)）”，就可以快速選定整張表格。1.4.6隨心所欲調(diào)整單元格中的文字對(duì)齊方式對(duì)于單元格中的文字，你可以隨意調(diào)整它的位置，上、 下、左、右、中間任意設(shè)定，設(shè)置的方法是：在單元格中右鍵單擊，彈出快捷菜單，在“單元格對(duì)齊”子菜單中單擊相 應(yīng)的命令即可，共有9種設(shè)定

11、可供選擇。第8頁(yè)共 15 頁(yè)1.4.7更方便地調(diào)整表格的位置這是在word中重新定位表格的一個(gè)捷徑。單擊“視圖頁(yè)面”命令，轉(zhuǎn)換到頁(yè)面視圖模式，在頁(yè)面視圖中，把鼠 標(biāo)指針?lè)旁诒砀竦淖笊辖侵钡匠霈F(xiàn)移動(dòng)柄（框中有一個(gè)4個(gè)頭的箭頭），點(diǎn)擊移動(dòng)柄，用它把表格拖動(dòng)到一個(gè)新位置。148整體縮放表格將光標(biāo)停留在表格內(nèi)部，直到表格尺寸控點(diǎn)（一個(gè)小“口”）出現(xiàn)在表格右下角，將鼠標(biāo)移至表格尺寸控點(diǎn)上， 待向左傾斜的雙向箭頭出現(xiàn)，沿需要的方向拖動(dòng)即可整體縮 放表格。149使你的列標(biāo)題可見(jiàn)當(dāng)你在word中創(chuàng)建一個(gè)表格時(shí)，你可以利用列標(biāo)題來(lái)描述每一列是什么信息。但如果表格很長(zhǎng)，超過(guò)一頁(yè)時(shí)，第 一頁(yè)后面的頁(yè)列標(biāo)題將看不到， 這樣你很難分辨每一列的主 題是什么。 這里將介紹一種使標(biāo)題可見(jiàn)的技巧：