| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 438 人关注过本帖
标题:[求助]后期绑定方面出问题,前期绑定却没事,请高手来帮我看看
只看楼主 加入收藏
tiger8888
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2007-3-15
收藏
 问题点数:0 回复次数:5 
[求助]后期绑定方面出问题,前期绑定却没事,请高手来帮我看看
我想操纵word,并进行一些文字替换,可是程序只有前期绑定才能正常运行,而后期绑定却不行,请高手帮我看看。先谢谢了。
程序如下:

Private Sub Command1_Click()
Dim mywdapp As Object
Dim mysel As Object
Set mywdapp = CreateObject("word.application")
mywdapp.Visible = True
mywdapp.Documents.Open "c:\1.doc"
mywdapp.ActiveDocument.Content.InsertAfter vbCrLf & "**123456789"
mywdapp.ActiveDocument.Content.Find.Execute FindText:="**", _
ReplaceWith:="hello", Replace:=wdReplaceAll
End Sub
搜索更多相关主题的帖子: 绑定 
2007-03-17 23:18
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 
我不知道什么叫前期绑定..什么叫后期绑定.

我的msn: myfend@
2007-03-18 00:12
tiger8888
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2007-3-15
收藏
得分:0 

我的意思就是不引用word,直接执行。插入**123456789可以实现,但查找替换就不行,请版主再帮忙看看,先谢谢

2007-03-18 00:23
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 
不引用word?
你知道word的编码方式么?.
如果不知道的.还是引用word吧.

我的msn: myfend@
2007-03-18 00:30
tiger8888
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2007-3-15
收藏
得分:0 
版主这么晚也没睡啊,谢谢您回帖。
我不想引用word,是因为word的版本太多,引用以后,针对不同版本的word要开发不同的程序
所以我定义mywdapp As Object而不是word.application,这样可以插入文字等功能但就不能查找替换了,也没有出错提示
2007-03-18 00:59
tiger8888
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2007-3-15
收藏
得分:0 
谢谢版主,问题已解决,改wdReplaceAll为2。
2007-03-18 11:52
快速回复:[求助]后期绑定方面出问题,前期绑定却没事,请高手来帮我看看
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.021551 second(s), 9 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved