用户登录
用户注册

分享至

word 同时选中多个表格 word选中多个表格

  • 作者: 你们真牛什么名字都取
  • 来源: 51数据库
  • 2020-04-15

word 同时选中多个表格

word有办法同时选中多个表格吗能不能同时对WORD文件中的多个

在工作过程中可能遇到这样的情况,一个很大的WORD文档中有许多个表格,需要对所有表格的某一项属性进行修改,但是一个表一个表的逐个修改实在太费时费力。

那有没有一次性选中所有表格,然后一次全部修改的办法呢,答案是:有!不过要用到“宏”。

方法是新建一个“宏”,代码如下:Sub qxbg()Dim tempTable As TableApplication.ScreenUpdating = False'判断文档是否被保护If ActiveDocument.ProtectionType = wdAllowOnlyFormFields ThenMsgBox "文档已保护,此时不能选中多个表格!"Exit SubEnd If'删除所有可编辑的区域ActiveDocument.DeleteAllEditableRanges wdEditorEveryone'添加可编辑区域For Each tempTable In ActiveDocument.TablestempTable.Range.Editors.Add wdEditorEveryoneNext'选中所有可编辑区域ActiveDocument.SelectAllEditableRanges wdEditorEveryone'删除所有可编辑的区域ActiveDocument.DeleteAllEditableRanges wdEditorEveryoneApplication.ScreenUpdating = TrueEnd Sub保存该宏之后,执行即可全部选中,然后就可以进行下一步操作了。

在word中怎么一次选中所有表格

1.ALT+F8,打开宏对话框,创建名为SelectAllTables的宏。

代码如下: Sub SelectAllTables()Dim tempTable As TableApplication.ScreenUpdating = False2. '判断文档是否被保护If ActiveDocument.ProtectionType = wdAllowOnlyFormFields ThenMsgBox "文档已保护,此时不能选中多个表格!"Exit SubEnd If3.'删除所有可编辑的区域ActiveDocument.DeleteAllEditableRanges wdEditorEveryone4.'添加可编辑区域For Each tempTable In ActiveDocument.TablestempTable.Range.Editors.Add wdEditorEveryoneNext'选中所有可编辑区域ActiveDocument.SelectAllEditableRanges wdEditorEveryone'删除所有可编辑的区域ActiveDocument.DeleteAllEditableRanges wdEditorEveryoneApplication.ScreenUpdating = TrueEnd Sub

word里包含多个表格如何同时修改

一、Word如何删除表格之快捷键 1、鼠标移到表格上,单击表格左上角的带箭头的十字架选中表格。

2、按 Shift + Delete(或 Backspace),表格连同内容一并被删除。

二、Word如何删除表格之右键 1、移鼠标到表格上,点击表格左上角的带箭头的十字架选中它,右键表格。

2、选择“删除表格”,则整个表格被删除,这是Word去除表格右键法。

...

word怎么实现一表多填有多个表格(有些不是表格),需要填的数据

ub 选中所有表格() Dim tempTable As Table Application.ScreenUpdating = False '.DeleteAllEditableRanges wdEditorEveryone '添加可编辑区域 For Each tempTable In ActiveDocument.Tables tempTable.Range.Editors.Add wdEditorEveryone Next '.ScreenUpdating = TrueEnd Sub上面是选中所有表格的宏代码!&quot.SelectAllEditableRanges wdEditorEveryone '删除所有可编辑的区域 ActiveDocument.DeleteAllEditableRanges wdEditorEveryone Application; Exit Sub End If '删除所有可编辑的区域 ActiveDocument;选中所有可编辑区域 ActiveDocument;判断文档是否被保护 If ActiveDocument.ProtectionType = wdAllowOnlyFormFields Then MsgBox "文档已保护,此时不能选中多个表格...

转载请注明出处51数据库 » word 同时选中多个表格

软件
前端设计
程序设计
Java相关