- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]怎么在word中插入图片 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=126330)
-- 发布时间：2018/10/18 17:13:00
-- [求助]怎么在word中插入图片
此主题相关图片如下：qq截图20181018170751.png
如图：想要用按钮命令向表中选中的word文件插入个签名应该怎么写？表中的word 是前面报表生成的
[此贴子已经被作者于2018/10/18 17:15:31编辑过]
-- 发布时间：2018/10/18 18:23:00
--
1、你要把图片插入到word的哪个位置？
2、参考代码
Dim app As New MSWord.Application
try
Dim fileName = "d:\\123.doc"
Dim doc As Object = app.Documents.Open(fileName)
app.ActiveWindow.Selection.WholeStory
If app.ActiveWindow.Selection.Find.Execute("[图片]") Then
app.ActiveWindow.Selection.InlineShapes.AddPicture("d:\\test.jpg")
End If
app.Visible = True
catch ex As exception
msgbox(ex.message)
app.Quit
finally
\'app.Quit
End try
-- 发布时间：2018/10/18 19:01:00
--
此主题相关图片如下：qq截图20181018190431.png
此主题相关图片如下：qq图片20181018185826.png
想在箭头所示位置添加图片作为电子签名，不知道该怎么去顶位置，请老师帮助。
实际上室想做个审批流程，报告---审核---批准，老师说下怎么写合理呢？
[此贴子已经被作者于2018/10/18 19:07:14编辑过]
-- 发布时间：2018/10/18 20:31:00
--
1、表格那里，记录对应的人员的名字或者对应的图片。
2、你这个不是word报表吗？直接引用表格里面图片列即可。
-- 发布时间：2018/10/18 21:04:00
--
是word报表，但是生成的报表数据不完全，需要再添加一些数据，等领导审批完再生成一次报表。我的思路是以添加数据后的文档作为模板，再生成一次报表，但这2 次的报表文件名不能改变，所以当第一次生成报表的同时另存为一份，以另存的为模板，但命令不知道怎么写，请老师教一下。
-- 发布时间：2018/10/18 21:11:00
--
不理解你为什么要这样做，每次都重新生成不就行了？
如果要生成word报表，代码如 http://www.foxtable.com/webhelp/scr/2890.htm
-- 发布时间：2018/10/18 21:22:00
--
没办法啊，第一次生成的报表还需要添加一些数据才能是完整的报告，这样才可以审核，现在生成报表的同时再另存一份，命令不会写
-- 发布时间：2018/10/18 21:31:00
--
1、要添加什么数据？从哪里添加数据进去？
2、如果单纯是另存一份，参考 http://www.foxtable.com/webhelp/scr/0342.htm
-- 发布时间：2018/10/18 21:49:00
--
老师，是这么写吗？FileSys.CopyFile ("ProjectPath & "attachments\\Reports\\" & e.form.controls("TextBox16").Text & ".doc" ", "C:\\TestFiles2\\test.doc") 提示出错啊
[此贴子已经被作者于2018/10/18 21:50:48编辑过]
-- 发布时间：2018/10/18 21:53:00
--
FileSys.CopyFile (ProjectPath & "Reports\\" & e.form.controls("TextBox16").Text & ".doc", "C:\\TestFiles2\\test.doc", true)