2. Actually for the Excel, if it does not have the reference to Excel, it creates a new Workbook. Then with each export, it uses existing tabs (Sheet1, Sheet2, Sheet3). If it gets past the number of sheets in the workbook then it adds a new sheet (to the end). Also, it changes the tab color (to green).
Other things: apply a freeze after the first row, apply filters, gray the header.
Some code similar to VBA code below:
Private Sub SheetFomat()
Dim wb As Excel.Workbook
Dim ws As Excel.Worksheet
Dim r1 As Range
Set ws = Me 'For example purposes, I placed this code in a Sheet Object
Set r1 = ws.Cells(1, 1).CurrentRegion
Set r1 = r1.Resize(1, r1.Columns.Count)
r1.AutoFilter
ws.Columns.AutoFit
r1.Replace " ", Chr(10)
ws.Columns.AutoFit
r1.Replace Chr(10), " "
r1.Interior.Color = "&HC0C0C0"
ws.Activate
ws.Cells(2, 1).Select
ActiveWindow.FreezePanes = True
ws.Tab.Color = vbGreen
End Sub
3. The CTRL END works (so does CTRL HOME).
Thanks