Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Using vb to create an excel object and save it as a CSV file
I am using the following code from a VB app to create an excel object, populate some information and then save the excel file
Dim oExcel As Objec Dim oBook As Objec Dim oSheet As Objec Set oExcel = CreateObject("Excel.Application" Set oBook = oExcel.workbooks.Ad Set oSheet = oBook.Worksheets(1 oSheet.Range("A1").Value = "EntryNumber oSheet.Range("B1").Value = "CheckNumber oSheet.Range("C1").Value = "CheckAmount oSheet.Range("D1").Value = "InvoiceNumber oSheet.Range("E1").Value = "invoicetype oBook.Saveas rptpath & "\cashreceipts.xls oExcel.qui although not displayed here I am populating the worksheet with the results of an ADODB recordse using the copyfromrecordset method This works fine but I actually want to save the file in CSV format. i saw the .fileformat property in excel but can't seem to get it to work properly. Any suggestions on how to get my existing code to save the file as a csv would be greatly appreciated Thanks in advance. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Using vb to create an excel object and save it as a CSV file
eli;
Try the following sub. You will need to modify the path and file name for yours. Sub try() ChDir "C:\Data" ActiveWorkbook.SaveAs Filename:="C:\Data\Book1.csv", FileFormat:=xlCSV, _ CreateBackup:=False End Sub Thanks Greg -----Original Message----- I am using the following code from a VB app to create an excel object, populate some information and then save the excel file. Dim oExcel As Object Dim oBook As Object Dim oSheet As Object Set oExcel = CreateObject("Excel.Application") Set oBook = oExcel.workbooks.Add Set oSheet = oBook.Worksheets(1) oSheet.Range("A1").Value = "EntryNumber" oSheet.Range("B1").Value = "CheckNumber" oSheet.Range("C1").Value = "CheckAmount" oSheet.Range("D1").Value = "InvoiceNumber" oSheet.Range("E1").Value = "invoicetype" oBook.Saveas rptpath & "\cashreceipts.xls" oExcel.quit although not displayed here I am populating the worksheet with the results of an ADODB recordset using the copyfromrecordset method. This works fine but I actually want to save the file in CSV format. i saw the .fileformat property in excel but can't seem to get it to work properly. Any suggestions on how to get my existing code to save the file as a csv would be greatly appreciated. Thanks in advance. . |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
CREATE TEMPORARY FILE WHEN SAVE | Excel Discussion (Misc queries) | |||
Excel changes file extension on embedded object upon save | Excel Discussion (Misc queries) | |||
In Excel, I want to create a backup copy whenever I save a file. | Excel Discussion (Misc queries) | |||
Excel 2000 cannot save and create temp file | Setting up and Configuration of Excel | |||
how do i create and save a new file or worksheet autmatically ever | Excel Discussion (Misc queries) |