实现同时将一个word文档中的所有表格执行“自动调整——根据窗口调整表格”操作
来源:互联网 发布:手持数据终端拆机 编辑:程序博客网 时间:2024/06/13 01:52
Sub www()
Dim oDoc As Document
Dim oTable As Table
Set oDoc = Documents.Open("D:\test\Sr.doc") '指定文件路径
For Each oTable In oDoc.Tables
oTable.AutoFitBehavior (wdAutoFitWindow) '根据窗口调整内容
Next
MsgBox "完成!"
End Sub
Dim oDoc As Document
Dim oTable As Table
Set oDoc = Documents.Open("D:\test\Sr.doc") '指定文件路径
For Each oTable In oDoc.Tables
oTable.AutoFitBehavior (wdAutoFitWindow) '根据窗口调整内容
Next
MsgBox "完成!"
End Sub
- 实现同时将一个word文档中的所有表格执行“自动调整——根据窗口调整表格”操作
- 一个word文档中,多个表格的批量调整(根据窗口调整表格和添加表格水平线)
- MS WORD 表格自动调整列宽,自动变漂亮,根据内容自动调整
- jtable 根据内容自动调整表格宽度
- DBGrid 根据表格中数据长度自动调整表格宽度
- jqgrid动态显示隐藏列,同时自动调整表格宽度
- word两个不同表格合并,防止自动调整
- word表格中文字位置调整
- Word表格不能调整宽度的解决方法
- jqGrid随窗口大小调整表格宽度
- 复制表格,自动调整列宽
- 如何一次性选中WORD文档中的所有表格
- showModalDialog根据内容自动调整窗口大小
- 根据窗口大小自动调整元素大小
- 窗口根据屏幕分辨率自动调整大小
- showModalDialog根据内容自动调整窗口大小
- 窗口根据屏幕分辨率自动调整大小
- 在WEB页面中根据分辨率自动调整内容宽度,以适应表格宽度
- Windows Phone开发环境搭建
- C#模拟POST提交表单(一)--WebClient
- 将任意多边形划分成几个凸多边形
- log4j详解--满足基本应用
- UC故事 2011/11/15
- 实现同时将一个word文档中的所有表格执行“自动调整——根据窗口调整表格”操作
- 使用js自动生成表格的行及元素并可以删除选中行
- 深入剖析ASP.NET的编译原理
- 推荐一个优化分页查询的办法(分页数很大的情况)
- Delphi函数调用效率测试
- 常用场效应管和晶体管参数大全
- iOS5新特性:ARC
- HTML5
- DataRowState