Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Command Button to export a worksheet as a .csv file
I'd like to make a command button that will export a specific worksheet as a
..csv file. Upon clicking the button, I'd like a prompt for the file name, then once I've saved the file I'd like to be back on the worksheet where I started. I've pasted together some code from other questions and I've almost got what I want, but it doesn't quite work. The code below will save the worksheet as a .csv file. But the new file remains open and active. I'd like the new file to be closed after I save it and I'd like to be back at the worksheet where I started in the original workbook. I'd appreciate any suggestions Private Sub CommandButton1_Click() Sheets("MySheet").Select Sheets("MySheet").Copy Do fName = Application.GetSaveAsFilename Loop Until fName < False ActiveWorkbook.SaveAs Filename:=fName, _ FileFormat:=xlCSV, Password:="", WriteResPassword:="", _ End Sub Where "MySheet" is the sheet that gets saved as a .csv file. ReadOnlyRecommended:=False, CreateBackup:=False |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Command Button to export a worksheet as a .csv file | Excel Programming | |||
Command Button On A Worksheet | Excel Programming | |||
Command button on worksheet | Excel Programming | |||
Command Button on worksheet | Excel Programming | |||
command button on worksheet | Excel Programming |