Undrar om hur man lägger in data i en xls fil.
Om man tex skriver typ nedan så hamnar både
datum och tid i samma kolumn. Hur får jag
de och ligga i olika som A och B.

Gör man som nedan blir det ju ingen riktig
xls fil heller utan excel frågar om man
skall spara som xls. Tamp4.xls finns inte
innan jag skriver till den.

Open "c:\Tamp4.xls" For Append As #1

Print #1, Date, Time

Close #1


Vänliga hälsningar
Lasse

Dim xlWorkBook As New Excel.Workbook
Dim xlSheet As Excel.Sheets
Dim vSheet As Variant

Dim strFileName As String

strFileName = "c:/MinFil.xls"

Set xlWorkBook = CreateObject("Excel.Sheet")
'Om filen redan finns kan du göra så här:
'Set xlWorkBook = GetObject(strFileName)
Set xlSheet = xlWorkBook.Sheets
Set vSheet = xlSheet.Item(1)

vSheet.Cells(1, 1) = "Kalle"
vSheet.Cells(1, 2) = "Olle"

xlWorkBook.SaveAs strFileName

xlWorkBook.Close