Ceating a csv file using vba

Hi Guys.

I need help with some code in vba.

I have a worksheet called Upload DTB, with data in rows 5 to 2174 across columns B to F.

I need to put a CommandButton on the sheet and, when clicked, it should create a .csv file of the data in the aforementioned cells. Also; if the file already exists on the desktop, a means of overwriting it.

I know that I can export the sheet as an xlCSV file; but that doesn't specify the delimiter, so what I need is a way to create a non-xlcsv file (just a simple csv file) on my desktop with a 'pipe' delimiter, of the information contained in the range B5 to F2174.

Any help would be greatly appreciated.

Hi,

many samples in threads of this forum, just use the Advanced Search …

Thanks for that Dave; however, when I ran the code I got run time error 1004 "Method 'Save As' of object '_Workbook' failed"

The only change I made to your code was "C:\Users\Acer\Downloads\".

When I tried your example I made a similar change to the path and it worked; however, the resulting file was in xlCSV format and therefore opened in Excel. I'm trying to send a straightforward non-Excel specific file to be opened in Oracle or Access or just a plain old Notepad.

Any ideas?

Put your data with column separators and line separators in a String variable and write it to a text file for example …

Advanced Search -> CSV !

It's ok Dave thanks. I checked through threads on here and found the following code that seems to work.

It produces a txt file instead of a csv and I'd prefer it to go on the desktop rather than into the Temp folder; so if you have any amendments to achieve those ends I'd be very grateful.

Please Login or Register  to view this content.

Please Login or Register  to view this content.

Thanks Kenneth; that works perfectly. Greatly appreciated.