so far i got this part...
can anyone help me out here?
Code:Set oExcel = New Excel.Application oExcel.Workbooks.Add oExcel.Sheets.Add oExcel.Visible = True
' thanks to another post i found this and it works fine.
Code:With oExcel .WindowState = xlMinimized ' .Visible = False 'hide excel alerts msgboxes .DisplayAlerts = False .Workbooks.OpenText FileName:="c:\sampleCSV.txt", _ Origin:=xlWindows, _ StartRow:=1, _ DataType:=xlDelimited, _ TextQualifier:=xlDoubleQuote, _ ConsecutiveDelimiter:=False, _ Tab:=False, _ Semicolon:=False, _ Comma:=True, _ Space:=False, _ Other:=False End With


Reply With Quote