ALT+F8,打开宏对话框,创建名为SelectAllTables的宏。代码如下:
Sub SelectAllTables()
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
保存完成后选择加载该宏即可。
word中多个表格如何全选
1、在电脑桌面里找到需要编辑到文档,双击打开后点击视图-宏-查看宏。
2、将宏的对话窗口打开之后,在宏名一栏下面输入名字,并点击创建。
3、然后在弹出来的窗口里面输入代码Sub SelectAllTables()、Application.ScreenUpdating = False '判断文档是否被保护 If ActiveDocument.ProtectionType = wdAllowOnlyFormFields Then MsgBox "文档已保护,此时不能选中多个表格!",用此段代码替换掉之前的默认代码。
4、将代码替换了之后在工具栏上面有一个运行选项,点击它就可以直接将多个表格选中了,此时也可以将宏的这个编辑窗口关闭就行了。
word中怎么一次选中所有表格
1、打开word文档,切换到“视图”选项、标签、点击“宏”选项,然后下拉箭头点击“查看宏”选项或者直接快捷键Alt+F8;
2、在弹出的宏创建对话框,输入宏名字(可以是中文),然后点击右侧“创建”按钮;
3、用所给的代码替换掉默认的内容:Sub SelectAllTables()、Application.ScreenUpdating = False '判断文档是否被保护 If ActiveDocument.ProtectionType = wdAllowOnlyFormFields Then MsgBox "文档已保护,此时不能选中多个表格!";
4、粘贴完代码后,直接点击工具栏的运行按钮▶,此时文档中所有表格已经选中,关闭VBA编辑器即可。
在worD中如何快速选中整个表格
1、在利用电脑快捷键选择时,如果需要选中多个不连续的单元格,就按住Ctrl键,鼠标依次选择要选中的单元格。
2、如果需要选中一部分的单元格,就按住Shift键,然后鼠标点击部分单元格的左上角单元格和右下角单元格,就可以选中两个单元格的旁边和两个单元格中间的所有单元格。
3、如果需要选中一个单元格,就把鼠标点击那个单元格,然后点击菜单栏表格工具下的“布局”,点击“选择”,再点击“选择单元格”即可。
扩展链接:
word中的其他快捷键:
按住[Ait]键,可以暂时忽略网格使图片平滑移动。
按住[Shift]键,依次选取需要对齐的图形,完成若干图形对齐任务。
按住[Shift]键并单击“打印预览”按扭,可快速打印工作表。
按[shift+Enter]组合键,可以在当前幻灯片的后面插入一张新幻灯片。
按[Tab]键,选择下一个单元格;按[Shift+ Tab]组合键选择前一个单元格。
按[Shift]键,再按回车键,就会产生一个换行符。如果打开的窗口或窗体角朵,并且把数据库窗口完全挡住了,这时只要按下[F11](也可以按下[Ait+ F11]),数据库窗口将被前置。
按[Ctri+:]组合键,可以输入当前日期;
按[Ctri+ shift+:]组合键,可以输入当前时间。选定大块区域,按[Shift]键后拖动鼠标。选定矩形区域,,按[Ait]键后拖动鼠标(大纲视图下无效)。
参考资料来源:人民网——超实用的最全Word快捷键
如何选中word里的所有表格?
ctrl+F----->表格,即可一次性选择word中的所有表格。-----<注:这是一个错误的答案,抱歉。下面有正确的答案,往下看。>
针对此回答,引来不少人的质疑和嘲笑,非常抱歉和遗憾;因为当时自己有个类似的需求,得知有该方法,遇到该问题时,当时觉得和自己当时遇到的问题一样就回答了。确实我说的这个方法只能是一次性突出显示word里的包含表格的标题,且该表格所属的标题必须做了级别设定,而且只是在导航窗格里黄色突出显示而已,好处是能看出来有级别设定的表格有多少,不是选中。如下图。
另回答一下本问题:“如何一次性选中word里的所有表格“
1 将下面的脚本复制(在最后哦,也是网上找的)
2 word---视图---宏----查看宏----输入宏名:SelectAllTables----点击创建(参图1)
3 将脚本编辑窗口中的默认代码删掉,粘贴1步复制的脚本,保存并关闭(参图2)
4 word---视图---宏----查看宏----运行刚创建的宏(参图1)
在word中查看,所有表格已为选中状态。
Sub SelectAllTables()
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
WORD中怎么选中表格的多个单元格进行删除
按住ctrl键(鼠标放在这一个单元格的左边变成向右的黑箭头点击)点击,选择你要删除的单元格,再进行删除
在word中如何使多个表格一样大
方法很简单,选择你要设置相同大小的表格或单元格,右键鼠标---表格属性,可以对行,列指定高度,行列高值可以根据你的情况具体来设置,这样做,你可以随心所欲的调整你的表格任何部分的大小。
word如何方便的选中表格中的多个单元格,是加标签还是书签?
有时想在WORD的表格里计算,但感觉计算远不如电子表格方便快捷,甚至=SUM(ABOVE)在单元格重新输入了数字后,计算结果都不能随之变化,需要在表格-公式里再计算一次.或者我未得其妙,还请各位老师指点.Excellover初级您最好不要这样想,您可以在Excel中做好表格,然后在link到word中yxzjls中级[建议]QUOTE:以下是引用荸荠有时想在WORD的表格里计算,但感觉计算远不如电子表格方便快捷,甚至=SUM(ABOVE)在单元格重新输入了数字后,计算结果都不能随之变化,需要在表格-公式里再计算一次.或者我未得其妙,还请各位老师指点.在WORD的表格中计算,不可能像EXCEL一样会自动更新.重新输入数据后都要选中域,再点击F9键方能得到新结果.另外在使用自动求和∑时还需注意两个问题:1、它求上优先,当上方没有数据时,它才会自动求左方;2、求和列或行中不能有空白单元,否则求和以空白单元为界.解决第二个问题的方法是:最简单的是在空白单元中输入0,再则是插入域后(如果你已经掌握了EXCEL)在SUM的参数中直接引用计算列或行的起止单元地址.荸荠中级QUOTE:以下是引用Excellover您最好不要这样想,您可以在Excel中做好表格,然后在link到word中在WORD的表格中计算,不可能像EXCEL一样会自动更新.重新输入数据后都要选中域,再点击F9键方能得到新结果.另外在使用自动求和∑时还需注意两个问题:1、它求上优先,当上方没有数据时,它才会自动求左方;2、求和列或行中不能有空白单元,否则求和以空白单元为界.解决第二个问题的方法是:最简单的是在空白单元中输入0,再则是插入域后(如果你已经掌握了EXCEL)在SUM的参数中直接引用计算列或行的起止单元地址.1、∑在工具栏表格和边框图标中;WORD为用户提供了SUM在内的18个函数,可在表格菜单的公式中查阅使用.
转载请注明出处51数据库 » word表格选择多个 word怎么同时选中多个表格