VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)

VB爱好者乐园(VBGood)

 找回密码
 立即注册
搜索
查看: 558|回复: 10

[求助] VB里生成word报告,同时把特定数据插入到模板文档的指定位置

[复制链接]

4

主题

0

听众

66

积分

初级程序员

Rank: 2Rank: 2

擂点
0
人气
0
威望
0
注册时间
2016-8-25
精华
0
帖子
8
发表于 2016-12-17 21:00:18 |显示全部楼层
如何实现

1

主题

1

听众

1300

积分

中级程序员

Rank: 3

擂点
0
人气
0
威望
5
注册时间
2013-6-21
精华
0
帖子
80
发表于 2016-12-18 17:01:53 |显示全部楼层
编写代码实现,扣扣:775420425
回复

使用道具 举报

4

主题

0

听众

66

积分

初级程序员

Rank: 2Rank: 2

擂点
0
人气
0
威望
0
注册时间
2016-8-25
精华
0
帖子
8
发表于 2016-12-18 17:42:37 |显示全部楼层
xss 发表于 2016-12-18 17:01
编写代码实现,扣扣:775420425

请说详细点
回复

使用道具 举报

37

主题

9

听众

1865

积分

中级程序员

Rank: 3

擂点
0
人气
56
威望
188
注册时间
2013-3-5
精华
0
帖子
267
发表于 2016-12-19 19:07:27 |显示全部楼层
打开一个WORD文档
随便拷贝一篇文章,长度大于3页
运行下面的代码,将会在当前打开的word中的第二页第4行插入“测试文本”


Set o_Word = GetObject(, "Word.Application") '获得系统中运行的Word对象
'将插入点移至第二页
o_Word .ActiveWindow.Selection.GoTo What:=1, Which:=1, Count:=1, Name:=2
'将插入点移至第4行
o_Word.ActiveWindow.Selection.GoTo What:=3, Which:=1, Count:=4
'插入文本
o_Word.Content.InsertAfter Text:="测试文本"
回复

使用道具 举报

1

主题

1

听众

1300

积分

中级程序员

Rank: 3

擂点
0
人气
0
威望
5
注册时间
2013-6-21
精华
0
帖子
80
发表于 2016-12-20 13:24:20 |显示全部楼层
详细点请加QQ详聊,如果你愿意的话。
回复

使用道具 举报

4

主题

0

听众

66

积分

初级程序员

Rank: 2Rank: 2

擂点
0
人气
0
威望
0
注册时间
2016-8-25
精华
0
帖子
8
发表于 2016-12-20 21:21:01 |显示全部楼层
xss 发表于 2016-12-20 13:24
详细点请加QQ详聊,如果你愿意的话。

请问收费吗
回复

使用道具 举报

37

主题

9

听众

1865

积分

中级程序员

Rank: 3

擂点
0
人气
56
威望
188
注册时间
2013-3-5
精华
0
帖子
267
发表于 2016-12-20 22:38:29 |显示全部楼层
免费,最好自己下载一个“WORD编程参考”,有各种例子,很详细,很全面。
下面是一个测试代码,请先打开压缩包中的“模板”,然后运行压缩包中的代码
可以在第4行插入一个测试文本。
test.rar (3.5 KB, 下载次数: 33)
回复

使用道具 举报

4

主题

0

听众

66

积分

初级程序员

Rank: 2Rank: 2

擂点
0
人气
0
威望
0
注册时间
2016-8-25
精华
0
帖子
8
发表于 2016-12-21 17:13:31 |显示全部楼层
vbfans01 发表于 2016-12-20 22:38
免费,最好自己下载一个“WORD编程参考”,有各种例子,很详细,很全面。
下面是一个测试代码,请先打开压 ...

你和5楼是一个人吗
回复

使用道具 举报

37

主题

9

听众

1865

积分

中级程序员

Rank: 3

擂点
0
人气
56
威望
188
注册时间
2013-3-5
精华
0
帖子
267
发表于 2016-12-22 17:54:52 |显示全部楼层
是不是一个人看名字就知道了。
回复

使用道具 举报

37

主题

9

听众

1865

积分

中级程序员

Rank: 3

擂点
0
人气
56
威望
188
注册时间
2013-3-5
精华
0
帖子
267
发表于 2016-12-22 17:57:11 |显示全部楼层
把特定数据插入到模板文档的指定位置,最好的方法是在模板文件中建立一个标签,然后通过标签对象操作。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

文字版|手机版|VBGood

GMT+8, 2017-1-17 23:08

VB爱好者乐园(VBGood)
回顶部