设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
楼主: wang1950317
打印 上一主题 下一主题

[模块/函数] 求助打开Word图片编辑的代码(已解决)

[复制链接]

点击这里给我发消息

跳转到指定楼层
1#
发表于 2013-3-5 11:02:10 | 显示全部楼层 回帖奖励 |倒序浏览 |阅读模式
本帖最后由 wang1950317 于 2013-3-7 08:22 编辑

各位老师:
   在绑定对象框中添加Word图片的操作是:右键单击对象框>插入对象>Microsoft office Access>在对象类型(T)中选择Microsoft word 图片>确定
   然后就打开一个Word界面。
   上述操作可否在绑定对象框单击事件的代码中完成?
   Excel有宏剥制功能,Access没有。试用在Excel剥制后代码放到Access中,
        放在绑定对向框中提示:运行时错误‘91’  对象变量或with块变量未设置。
         
    ActiveSheet.OLEObjects.Add(ClassType:="Word.Picture.8", Link:=False, _
        DisplayAsIcon:=False).Activate
  
小的代码不行,请教各位老师!
谢谢!



本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏1 分享分享 分享淘帖 订阅订阅

点击这里给我发消息

2#
 楼主| 发表于 2013-3-5 12:25:03 | 显示全部楼层
谢谢tmtony老师指教!
出现以下提示:
      
请您再指点!谢谢!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

点击这里给我发消息

3#
 楼主| 发表于 2013-3-5 14:19:02 | 显示全部楼层
谢谢tmtony 老师
小的代码很菜,不太懂,我的目的是在点击绑定对象框后打开一个空的word图片编辑器(用来编辑一个OLE对象,把这个对象添加到绑定对象框中)。不是先有一个OLE对象,然后把它添加到绑定对象框中。
  一楼附件:在绑定对象框中添加Word图片的操作是:右键单击绑定对象框>插入对象>Microsoft office Access>在对象类型(T)中选择Microsoft word 图片>确定,这样就打开了一个word文档,可以使用绘图工具编辑一个需要的图,退出后,它就自动添加到绑定对象框中啦。我需要的完成的红字部分功能即可。不知代码怎样改?
请再指教!谢谢!

点击这里给我发消息

4#
 楼主| 发表于 2013-3-5 21:56:52 | 显示全部楼层
谢谢ly老师指教!
试过提示这一句:obj As Word.Application  编译错误,用户定义类型未定义。
请再费神指点!

点击这里给我发消息

5#
 楼主| 发表于 2013-3-5 22:26:56 | 显示全部楼层
引用的问题,已添加了。可以打开word。但还有问题:
     使用:右键单击绑定对象框>插入对象>Microsoft office Access>在对象类型(T)中选择Microsoft word 图片>确定  打开word后,使用绘图工具作图,关闭、退出word后直接就保存在绑定对相框中啦,没有提示保存位置。
    而使用6楼代码打开word,使用绘图工具作图后,不能关闭word,提示要保存文档保存位置,保存后Access绑定对相框中不显示图片。
   请楼上老师再帮忙!谢谢!

点击这里给我发消息

6#
 楼主| 发表于 2013-3-6 12:38:20 | 显示全部楼层
obj布点图
这一句提示:
编译错误
方法和数据成员未找到

谢谢!

点击这里给我发消息

7#
 楼主| 发表于 2013-3-6 13:32:09 | 显示全部楼层
改成绑定对象框后提示它的下一句
.Action = acOLECreateEmbed
运行错误‘2777’
你试图运行的visuai Basic 过程中,CreateObject函数中类参数无效。
谢谢!

点击这里给我发消息

8#
 楼主| 发表于 2013-3-6 19:51:39 | 显示全部楼层
谢谢您不厌其烦!
还是窗体和绑定对像框名称问题,如果名称改回(“布点图”),则下一句又出现与12楼一样的提示。
如ly老师有空吧一楼附件下来做做看。不胜感谢!

点击这里给我发消息

9#
 楼主| 发表于 2013-3-7 08:21:26 | 显示全部楼层
非常感谢ly老师的指点。终于好啦!谢谢!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-14 07:24 , Processed in 0.093941 second(s), 33 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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