如何一次性選中word文檔中的所有表格
如果你的Word里面全是表格,那你Ctrl+A就可以全選。
如果你的文檔里還夾雜其他文字或者圖片內容的話,那就無法實現你所說的。
在word中怎么一次選中所有表格
1、點開你需要表格調整的word文檔,切換到視圖,點擊宏。
2、在彈出的對話框中輸入宏的名字可以是英文,然后點擊創建按鈕。
3用下面代碼替換掉原有默認內容
Sub 表格()
Dim tempTable As Table
Application.ScreenUpdating = False
'判斷文檔是否被保護
If ActiveDocument.ProtectionType = wdAllowOnlyFormFields Then
MsgBox "文檔已保護,此時不能選中多個表格!"
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
4、替換之后點擊運行按鈕,之后關閉宏編輯。
5、關閉后此時文檔中所有表格都已選中。
1.ALT+F8,打開宏對話框,創建名為SelectAllTables的宏。代碼如下:
Sub SelectAllTables()
Dim tempTable As Table
Application.ScreenUpdating = False
2. '判斷文檔是否被保護
If ActiveDocument.ProtectionType = wdAllowOnlyFormFields Then
MsgBox "文檔已保護,此時不能選中多個表格!"
Exit Sub
End If
3.'刪除所有可編輯的區域
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
4.'添加可編輯區域
For Each tempTable In ActiveDocument.Tables
tempTable.Range.Editors.Add wdEditorEveryone
Next
'選中所有可編輯區域
ActiveDocument.SelectAllEditableRanges wdEditorEveryone
'刪除所有可編輯的區域
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
Application.ScreenUpdating = True
End Sub
ctrl+a,,或者鼠標移動到表格上會看到一個十字,點一下就選定了,多選的時候需要按ctrl進行選擇,不然只能選一個~~
wps文字中如何全選所有表格
在對于使用的一個的wps文字中來對文字做全選,這里告訴大家怎么全選。
1、首先在電腦中打開WPS表格,點擊菜單欄“開始”,如下圖所示。
2、接著在打開的開始選項中,如下圖所示,找到“選擇”功能并點擊。
3、然后在下拉列表中,點擊“全選”選項,如下圖所示。
4、這樣就能把WPS文字的內容全部選擇,如下圖所示選擇完成了。
方法一:
單擊WPS文字---->編輯---->全選命令,如圖所示。
方法二:
將光標定位文檔的開頭,按住Shift鍵,然后將光標定位在文檔的末尾,這樣也可以全選文字。
方法三:
將鼠標移動到文檔左側,當鼠標指針變為向右的箭頭時,三擊鼠標,這時候也可以全選文字。
方法四:
按照Ctrl+A 組合鍵,也可以全選文字。
相關推薦:
最高額保證法律依據(民法典后保證最高額擔保的規定)
中外合資經營企業的資本(中外合資企業注冊資本金要求)
車輛抵押貸款(汽車抵押貸款需要什么條件)
國有企業設立的資料(國有企業注冊條件)
怎么注冊公司流程(公司注冊流程及需要的材料)