Unlock a world of possibilities! Login now and discover the exclusive benefits awaiting you.
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
Hi,
Could you send a part of your QV application for testing.