找回密码
 加入
搜索
查看: 3906|回复: 4

[网络通信] [己解决]如何将图片插入WORD的表格中

[复制链接]
发表于 2013-6-6 10:52:02 | 显示全部楼层 |阅读模式
本帖最后由 chzj589 于 2014-5-16 15:34 编辑

如何将图片插入WORD的表格中,查看帮助如下:
; *******************************************************
; 示例 1 - 创建含新的空文档的 word 窗口,
;               然后添加一些图片到文档.
; *******************************************************
;
#include <Word.au3>

Local $sPath = @WindowsDir & "\"
Local $search = FileFindFirstFile($sPath & "*.bmp")

; 检查搜索是否成功
If $search = -1 Then
    MsgBox(4096, "错误", "No images found")
    Exit
EndIf

Local $oWordApp = _WordCreate()
Local $oDoc = _WordDocGetCollection($oWordApp, 0)

While 1
    Local $file = FileFindNextFile($search)
    If @error Then ExitLoop
    Local $oShape = _WordDocAddPicture($oDoc, $sPath & $file, 0, 1)
    If Not @error Then $oShape.Range.InsertAfter(@CRLF)
WEnd

; 关闭搜索句柄
FileClose($search)

上面只是添加到WORD,我是要插入到WORD的表格中
 楼主| 发表于 2013-6-6 14:34:33 | 显示全部楼层
此帖仅作者可见
发表于 2013-6-6 14:54:31 | 显示全部楼层
此帖仅作者可见
 楼主| 发表于 2013-6-6 15:05:12 | 显示全部楼层
此帖仅作者可见
 楼主| 发表于 2013-6-23 22:33:16 | 显示全部楼层
此帖仅作者可见
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-22 18:14 , Processed in 0.086644 second(s), 27 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表