table.CopyTableToClipboard question

[amien]

see code below

this gives me this result:

11111

XXXX 22222

33333

but i want

XXXXX 111111

XXXXX 222222

XXXXX 333333

this is the same result that i have with Send to Excel

 XLApp.Visible = True

 'set XLSheet = XLDoc.Worksheets(TabNumber)
 set XLSheet = XLDoc.Worksheets.Add
 XLSheet.Activate

 set table = ActiveDocument.GetSheetObject(SheetObject)

 table.CopyTableToClipboard false 'Copy data to Clipboard
 XLSheet.Paste XLSheet.Range("A1") 'Paste data into cell

 XLSheet.Cells.WrapText = False

 XLsheet.Cells.select
 XLsheet.Cells.EntireColumn.AutoFit

 XLSheet.Rows("1:1").Select
 XLSheet.Cells.AutoFilter
 XLsheet.name = TabText

[martin59]

Hi,

Could you send a part of your QV application for testing.