客户端的vbs 如何在word中建立表格
请教:
我利用vbs在客户端打开word文档并可以输入文字 部分代码如下:
<script language="vbscript">
function Openword()
dim wordapp
set wordapp = createobject("word.Application")
wordapp.visible=true
wordapp.windowstate=1
wordapp.documents.add
wordapp.activewindow.view.showparagraphs=false
wordapp.selection.ParagraphFormat.Alignment = 1
wordapp.selection.typetext "hello world!"
end function
</script>
现在想用同样的方式在 word 画表格并输入文字 请教代码编写
搜索资料发现了 range.table.add() 对象和方法可以实现 但都是在vb中实现的 转化为vbs并不会用 (已尝试多次)忘高手赐教!!
我利用vbs在客户端打开word文档并可以输入文字 部分代码如下:
<script language="vbscript">
function Openword()
dim wordapp
set wordapp = createobject("word.Application")
wordapp.visible=true
wordapp.windowstate=1
wordapp.documents.add
wordapp.activewindow.view.showparagraphs=false
wordapp.selection.ParagraphFormat.Alignment = 1
wordapp.selection.typetext "hello world!"
end function
</script>
现在想用同样的方式在 word 画表格并输入文字 请教代码编写
搜索资料发现了 range.table.add() 对象和方法可以实现 但都是在vb中实现的 转化为vbs并不会用 (已尝试多次)忘高手赐教!!
...全文
相关推荐
vbs对 word的操作
vbs对 word的操作vbs对 word的操作vbs对 word的操作vbs对 word的操作vbs对 word的操作vbs对 word的操作vbs对 word的操作vbs对 word的操作vbs对 word的操作
vbs对 word的操作2
vbs对 word的操作2vbs对 word的操作2vbs对 word的操作2vbs对 word的操作2vbs对 word的操作2vbs对 word的操作2vbs对 word的操作2
vbs合并word文档
vbs合并word文档代码。把这个vbs合并word文档.txt改为vbs合并word文档.vbs,然后和两个word文档(分别为a.doc和b.doc)放在一个文件夹中,双击后即可合并。
使用VBS设置Word图片水印(docWatermark.vbs)
使用VBS脚本语言,为WORD添加图片水印。 你也可以参照说明,添加文字水印。 其实,Word的水印,就是设置的页眉。 用法: docWaterMark.vbs "C:\Test.doc" "C:\Water.jpg" 你可在批处理中来调用该脚本,就可以实现批量设置水印了。 编写该脚本的初衷是:为了由程序控制添加Word图片水印的功能。
vbs对excel和 word的操作
vbs对excel和 word的操作vbs对excel和 word的操作vbs对excel和 word的操作vbs对excel和 word的操作


