Convert Excel to text in VB6
How to save an Excel file to a Text using Visual basic 6.0
Can we get examples? Thanks |
Convert Excel to text in VB6
Dim xlApp as Object
Dim xlBk as Object set xlApp = CreateObject("Excel.Application") set xlBk = xlApp.workbooks.Open("C:\My Folder\MyFile.xls") On error resume next kill "C:\My Folder\MyTextFile.CSV" On Error goto 0 xlBk.SaveAs "C:\My Folder\MyTextFile.csv", 6 ' xlCSV = 6 xlbk.Close Savechanges:=False set xlbk = Nothing xlApp.Quit set xlApp = Nothing -- Regards, Tom Ogilvy "JT" wrote in message ... How to save an Excel file to a Text using Visual basic 6.0 Can we get examples? Thanks |
All times are GMT +1. The time now is 01:56 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com