标题:VB生成Word中段落换行问题
只看楼主
wmf2014
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:216
帖 子:2039
专家分:11273
注 册:2014-12-6
得分:12 
我觉得你是对Word.Document属性方法理解错误,使用了add方法后是在指定行插入,未使用add方法则是对指定行修改,下述代码科看到用“啊啊啊”、“不不不”、“擦擦擦”替换第四行数据
Dim wddoc As Word.Document
Dim wd As New Word.Application
Dim px As Word.Paragraph
wd.Documents.Add
Set wddoc = wd.ActiveDocument
Set px = wddoc.Paragraphs.Add
px.Range.Text = "第一行" & vbCrLf & "第二行" & vbCrLf & "第三行" & vbCrLf
Set px = wddoc.Paragraphs.Add
px.Range.Text = "第四行" & vbCrLf & "第五行" & vbCrLf & "第六行" & vbCrLf
Set px = wddoc.Paragraphs(4)
px.Range.Text = "啊啊啊" & vbCrLf & "不不不" & vbCrLf & "擦擦擦" & vbCrLf  '用该数据取代第4行数据
wd.Visible = True

能编个毛线衣吗?
2016-06-20 19:19
sunduke
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2010-5-8
得分:0 
回复 11楼 wmf2014
明白了,果然如此,指定了行,就出现乱了,不指定的话就正常了。谢谢!
2016-06-21 08:00



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-466051-1-1.html




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

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