那位高手会在word中录制宏，批量更改表格格式用的★★★★★...
发布网友
发布时间：2022-04-29 22:49
我来回答
共4个回答
热心网友
时间：2023-10-09 23:10
楼主可以直接写VBA，因为录制的宏其实也是VBA代码。
比如，下面这几个步骤可以批量修改文档中所有表格的字体/字号为12磅黑体。
1、键入Alt+F11打开VBA编辑器，选择菜单“插入-模块”；
2、将下面代码粘贴进去：
Sub BatchChangeTableStyle()
Dim oTable As Table
For Each oTable In ActiveDocument.Tables
oTable.Range.Font.Name = "黑体" ' 改变表格字体为“黑体”
oTable.Range.Font.Size = 12 ' 改变表格字号为12磅
Next
Set oTable = Nothing
MsgBox "完成！"
End Sub
可以根据需要修改上面代码中的字体和字号。
3、键入F5运行看到“完成！”结束；
4、切换回Word窗口检查效果。
此外，我不太明白楼主说的“表格页边距”具体是什么意思？是说表格属性窗口里面那个“左缩进”还是其它什么属性？能补充说明一下吗？
______
补充：
哦，抱歉原来我可能没有看仔细题目，楼主还有一个重要的要求是需要对“很多文档”批量处理。下面的代码可以完成完整的需求。注意需要把代码里面设置文件夹以及设置表格字体/字号和页面边距的那些地方根据你的实际情况修改一下。
Sub BatchChangeTableAndPageMargins()
On Error Resume Next
Const strRootPath = "D:\Temp\Docs\Tables" ' 存放所有需要调整的文件的目录
Dim arrDocFiles As New Collection
Dim fso, oFolder, oFile
Dim oDoc As Document
Dim oTable As Table
Set fso = CreateObject("Scripting.FileSystemObject")
Set oFolder = fso.GetFolder(strRootPath)
For Each oFile In oFolder.Files
Set oDoc = Documents.Open(oFile.Path)
oDoc.PageSetup.TopMargin = CentimetersToPoints(3) ' 天头
oDoc.PageSetup.BottomMargin = CentimetersToPoints(2.8) ' 地脚
oDoc.PageSetup.LeftMargin = CentimetersToPoints(2.5) ' 切口
oDoc.PageSetup.RightMargin = CentimetersToPoints(2) ' 订口
For Each oTable In oDoc.Tables
oTable.Range.Font.Name = "黑体" ' 改变表格字体为“黑体”
oTable.Range.Font.Size = 12 ' 改变表格字号为12磅
Next
oDoc.Close True
Next
Set oTable = Nothing
Set oDoc = Nothing
MsgBox "完成！"
End Sub
热心网友
时间：2023-10-09 23:10
这个录制宏应该可以完成，录制宏的过程也较麻烦，不过就你的问题修改字体大小应该一步完成，CTRL+A选字号和字体就可以了。至于那个表格边界线问题你可以更改WORD的模板为你的样式后默认就可以了，不见得麻烦，试试！
热心网友
时间：2023-10-09 23:11
录制宏在EXCEL里面用得比较多，但是你的WORD表格都是一样的格式的话还是可以。在工具-宏-录制新宏，然后命个名，把你的操作录制一遍。以后就可以用这个操作了。
热心网友
时间：2023-10-09 23:11
“表格页边距”是指什么？页边距还是单元格边距？
那位高手会在word中录制宏,批量更改表格格式用的★★★...
1、键入Alt+F11打开VBA编辑器，选择菜单“插入-模块”；2、将下面代码粘贴进去：Sub BatchChangeTableStyle()Dim oTable As Table For Each oTable In ActiveDocument.Tables oTable.Range.Font.Name = "黑体" ' 改变表格字体为“黑体”oTable.Range.Font.Size = 12 ' 改变表格字号为12磅 N...
word文档如何生成ppt
作为深圳市博思云创科技有限公司的工作人员，对于Word文档生成PPT的操作，我们有以下建议：1. 使用另存为功能：在Word中编辑完文档后，点击文件->另存为，选择PowerPoint演示文稿（*.pptx）格式，即可将文档内容转换为PPT。2. 手动复制粘贴：在Word中选择要转换的内容，复制后打开PPT新建幻灯片，粘贴内容并调整格式。3. 利用大纲视图：在Word中通过视图->大纲设置标题等级，然后在PPT中通过打开功能选择此Word文件，即可根据大纲自动生成PPT。以上方法可快速实现Word文档到PPT的转换。博思AIPPT是基于ai制作PPT的智能在线工具，它提供了4种AI制作PPT的方式，包括AI生成大纲、AI直接生成PPT、文本生成PPT、AI提炼word文档生成PPT，一站式集成多种AI生成PPT的方式，可满足办公用户的不同需求和使用场景。相比较其它ai生成ppt工具，...
word如何批量修改表格格式word如何批量修改表格格式不变
1，首先单击“文件”—“选项”;2，在弹出的“选项”面板上“自定义功能区”面板的右边一栏勾线“开发工具”;3，单击“开发工具”，在弹出的面板上单击“visualbasic”;4，调出代码窗口，输入批量修改表格代码;5，单击“开发工具”—“宏”;6，在弹出的宏命令选择框中选择“批量修改表格”执行“宏命令...
word录制的宏怎么批量运行word录制宏的步骤视频
1. 打开Word并选择要运行宏的工作簿。2. 在“开始”选项卡中，单击“自定义视图”按钮。3. 在“自定义视图”对话框中，单击“新建”按钮。4. 在“新建模板”对话框中，选择“宏”选项卡，并单击“添加”按钮。5. 在“宏”选项卡中，选择您要运行的所有宏，并单击“确定”按钮。6. 关闭“自定...
word2010宏的综合应用,表格制作,怎么做
打开word文档。先敲入几个回车，换行。把光标停留在中间。2 在工具栏中，选择【工具】--【宏】---【录制宏】。3 填入宏的名称 制表，点击确定。4 开始录制。在工具栏中，点击【表格】--【插入】--【表格】。5 填写表格属性为：行为4，列为4，表格样式选择默认，点击确定。6 这样就可以看到有一...
word文档如何输入数据形成不同文档在word中输入数据有两种状态_百度知 ...
1. 打开需要输入数据的 Word 文档，在“开始”选项卡中选择“录制宏”。2. 在“录制宏”对话框中，输入宏的名称，例如“数据输入”。3. 在“数据输入”宏中，输入需要输入的数据，每次输入数据时，Word 会自动将其转换为相应的模式。4. 停止录制宏，在 Word 中打开“宏”选项卡。5. 在“宏”...
怎样在word2007中使用宏?
1. 确认WPS版本是否支持VBA： 在开始安装VBA模块之前，首先要确保你的WPS版本支持VBA功能。你可以通过查看WPS的版本信息或者访问WPS的官方网站来确认这一点。如果你的WPS版本过低或者不支持VBA，你可能需要升级到一个支持VBA的版本。2. 下载VBA模块的安装包： 确认WPS版本支持VBA后，你需要找到一个可信赖...
word中的宏如何使用?
1、“宏”可以在“开发工具”菜单栏找到，可是，怎么没有看见“开发工具”这一项？没关系，等我把它变出来。单击“文件”，会出现一个页面，点击页面左侧最后一行的“选项”。在弹出的对话框里找到“自定义功能区”并点击。2、接着，看看在右边的大框框里，是不是有“开发工具”这一项，好的，勾选...
Word中,运用宏批量设置当前文档中所有表格的单元格内容为水平居中对齐...
我可以帮你实现word中所有表格水平居中垂直居中的效果，就用VBA代码来解决。Su 水平垂直居中()Dim t As Table For Each t In Me.Tables t.Select Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter Selection.Range.Cells.VerticalAlignment = wdCellAlignVerticalCenter Next End Sub ...
在word 2007中怎样使用宏
用户可以在 Visual Basic 编辑器中打开已录制的宏,修改其中的指令。也可以直接用 Visual Basic 编辑器创建新宏,这时可以输入一些无法录制的指令。 启动宏录制器,并进行一系列操作,即可在 Word 中录制宏。可以将一些经常使用的宏指定到工具栏、菜单或快捷键中,以后运行宏就可以直接单击工具栏按钮或菜单项,或按快捷...
如何用VB代码制作Word文档的字体设置框
方法/步骤 1 打开word 双击桌面word图标打开word窗口，也可同时按下“win+r"键，在运行对话框中输入：winword，回车亦可快速打开word窗口。2 制作样表 在打开的word文档中，插入一个样表，用于后期操作。把光标定位到表格中，这时工具栏会出“设计”选框卡，点击切换到该页面上。开始录制宏 1.此时，...
