Missing fields of table box while creating qvd file for the table box

[jagannalla]

Hi,

I have added all my fields into one table box. And return a macro in button to generate qvd file but when i'm loading the qvd file i'm missing last fields of table box in the qvd file.

Macro code is :

Sub QVDFile                                              

    set obj = ActiveDocument.GetSheetObject("TB05") 

    obj.ExportBiff "D:\2_QVDGenerator\QVD\MyQvd.qvd" 

'    MsgBox("Data Has Been Transfer into QVD ")

    End Sub

- Plz help me y it is not creating last fields of table box into qvd file

[kaushiknsolanki]

Hi,

   Same code works fine at my side.

   Can you please provide the qvw.

Regards,

Kaushik Solanki

[jagannalla]

Kaushik,

I think you tried with less fields. Can you try with more than 300 fields in table box.

[kaushiknsolanki]

Hi,

   Sorry i dont have any kind of data where i have 300 fields.

   So it will be better if you provide me data.

Regards,

Kaushik Solanki

[jagannalla]

I'm attaching my qvd file and load it and add into table box..

[kaushiknsolanki]

Hi,

   The reason is you are using exportbiff. This is used for excel only.

   So when you use this for exporting into qvd, in background it goes to excel and then to qvd.

   The reason why many fields are missing is excel can not handle this many fields.

   i will say instead of creating  table box create a straighttable  with all fields as dimention and 1 as expression.

   Then use below code in your macro.

   set obj = ActiveDocument.GetSheetObject("CH01")

   obj.ExportEx "C:\test.qvd", 4      

Regards,

Kaushik Solanki

[jagannalla]

Kaushik,

Thanks for your brief explanation but, i have few doubts.

1. wt is the use 4 after qvd name

2. Y the macro code is not working for table box.

3. you suggested me to take straight table. But if i add 300 fields into dimension along with one expression it will not provided horizontal scroll bar and copies entire sheet in horizontal wise. To get horizontal scroll bar i need to manually add all the 300 fields in expression. B'coz the horizontal scroll bar appears for expressions in straight table.

How can i overcome all above points.

[kaushiknsolanki · Accepted solution]

Hi,

  Try below code

Sub QVDFile                                             

    set obj = ActiveDocument.GetSheetObject("TB01")

    obj.Export "MyQvd12.qvd",";"

'    MsgBox("Data Has Been Transfer into QVD ")

    End

Regards,

Kaushik Solanki

[jagannalla]

Thanks kaushik..

Can you explain me why you are taking "," and 4 after qvd name..

[kaushiknsolanki]

Hi,

   When you use export function you need to specify the format in which you have to export.

   So here 4 is used to specify the qvd. Means export in qvd.

Regards,

Kaushik Solanki