以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  在WORD模板中有4列多行表格的数据,在生成的文件中,成每行一个表格了,请问如何设置可以生成WORD文件中的多行的表?谢谢  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=57925)

--  作者:刘海屋
--  发布时间:2014/10/8 14:12:00
--  在WORD模板中有4列多行表格的数据,在生成的文件中,成每行一个表格了,请问如何设置可以生成WORD文件中的多行的表?谢谢

你好,我有一个Word表,样子如下:

        

GRANDES   DESTINATIONS

CONFORT

STANDING 

EXCLUSIVE

LA PLAGNE

175

220

320

ALBERTVILLE/    MERIBEL/    VALMOREL                   

195

260

340

COURCHEVEL/    LESMENUIRES/     CHAMPAGNY

210

265

350

 

模板为:

 

GDEST

CONFORT

STANDING 

EXCLUSIVE

[GDEST]

[CONFORT]

[STANDING]

[EXCLUSIVE]

[GDEST]    [CONFORT]   [STANDING]    [EXCLUSIVE]
[GDEST]    [CONFORT]   [STANDING]   [EXCLUSIVE]

 

用的程序是: 

    Dim tm As String  = ProjectPath & "Attachments\\Model\\UpdateModel.doc" \'指定模板文件
    Dim fl As String = ProjectPath & "Reports\\UpdateTest.doc" \'指定目标文件
    Dim wrt As New WordReport(Tables("x_UpdateInfoTable"),tm,fl) \'定义一个WordReport
    For Each r As Row In Tables("x_UpdateInfoTable").Rows \'逐行生成报表
        wrt.BuildOne(r)
    Next
\'wrt.Build() \'逐行生成报表

    wrt.Show() \'显示报表

 

结果是:要么是只生成第一行,要么是每行生成一个表格。请教问题在什么地方。谢谢。

刘海屋

 


--  作者:有点甜
--  发布时间:2014/10/8 14:17:00
--  
  word报表无法实现你这种功能,word报表只能用于套打,如果你要这种,就用excel报表吧
--  作者:刘海屋
--  发布时间:2014/10/11 17:20:00
--  知道了,谢谢。
知道了,谢谢。