哪位大虾帮帮我,如何将vb中数据以表格形式插入word文档文字后?谢谢谢谢!
lp166 2004-09-22 09:48:44 大家帮我看看,如何将表格插入到文字后?为什么表格总插入在文字前?
Dim wdapp As Word.Application
Set wddoc = wdapp.Documents.Add
Set RgText = wddoc.Paragraphs(1).Range
'生成段落区域
RgText.Font.Size = 10
RgText.ParagraphFormat.Alignment = wdAlignParagraphLeft '居左
RgText.Sections(1).Range.InsertBefore "地形图" & vbCrLf & vbCrLf
With wdapp
.Visible = True
.Activate
'在word中增加一个表格
Set atable = .ActiveDocument.Tables.Add(.Selection.Range, 4, 7)
End With