access带照片的报表输出到WORD中，只在相应位置留有空格，而没有照片。
我的问题是：如果想在WORD 中还原成和ACCESS中一样的报表，有没有快捷的方式？（我现在的作法是一张一张插入照片）
另：照片现在二个地方有：一是ACCESS 中库中，二上电脑中一个独立的文件夹。
------最佳解决方案--------------------------------------------------------
建议用VBA将数据(包括照片)导入到WORD的模板中，
否则找找第3方的控件。
------其他解决方案--------------------------------------------------------
对，要看看WORD的宏，怎样操作WORD
------其他解决方案--------------------------------------------------------
你可以把照片放在文件夹下，然后在WORD中录制一段宏，插入一个照片，分析一下自动生成的代码，然后改一下就行了。
------其他解决方案--------------------------------------------------------
呵呵，WORD比EXCEL困难一点
------其他解决方案--------------------------------------------------------
VB代码，关键是你要熟悉WORD的对象模型。 这个你可以在WORD的VBA帮助中看到。
------其他解决方案--------------------------------------------------------
你的图片文件命名如果没有规律，就不能用下面的代码。
------其他解决方案--------------------------------------------------------
在相应位置留有空格，还有没有照片的信息，比如照片的名字等。
------其他解决方案--------------------------------------------------------
是在access中用VBA吗？我从来没试过，那我试试看，也不知道难不难
谢谢
------其他解决方案--------------------------------------------------------
好，我先学学
------其他解决方案--------------------------------------------------------
貌似有点高难度
我现在网上BAIDU
------其他解决方案--------------------------------------------------------
完全看不懂，太难了，我准备放弃了，
从网下扒了二段
Sub Macro1()
For i = 101 To 130
pic_name = "D:\My pic\1018256" + Trim(Str(i)) + ".jpg"
Selection.MoveRight Unit:=wdCell
Selection.InlineShapes.AddPicture FileName:=pic_name, _
LinkTofile:=False, SaveWithDocument:=True
Next
End
Sub setpicsize()
'
' setpicsize 宏
'
'
Dim j '计数图片个数
For j = 1 To ActiveDocument.InlineShapes.Count '74
ActiveDocument.InlineShapes(j).Height = 210 '设置高度
ActiveDocument.InlineShapes(j).Width = 261.87 '设置宽度
Next j
End Sub
完全不能运行，还不如一张张拷来得快呢
------其他解决方案--------------------------------------------------------
天书~~~~~~~~
------其他解决方案--------------------------------------------------------
是呀，好象是类似于C语言的东西，
------其他解决方案--------------------------------------------------------
000 *** 前三个顺序号+空格+姓名
算是有规律吗？
------其他解决方案--------------------------------------------------------
我觉得是没有，只有一片空白。
从ACCESS中导出的rft文件，文字内容包括 排列同数据库中的报表都一样，编号，姓名，身份证号，照片，电话，字段都有，就是该有照片的位置，是一片空白，如图
------其他解决方案--------------------------------------------------------
在access里只留一条记录，然后发给我。
dsd999@sohu.com
------其他解决方案--------------------------------------------------------
我结帖太早了，结帖以后就没有短消息提醒了，就是有新的回复也不显示，要不是刚才按错了位置，可能这个新回复就要石沉大海了，我永远也会不知道，万幸
------其他解决方案--------------------------------------------------------
抱歉，还以为结帖就不会有回复了，今天 才看到。
给您发了一个删除的没剩什么的库，希望还能看出来是什么问题
谢谢了
------其他解决方案--------------------------------------------------------