Excel: macro to export worksheet as CSV file without leaving my current Excel sheet

by

@NathanClement was a bit faster. Yet, here is the complete code (slightly more elaborate):

Option Explicit

Public Sub ExportWorksheetAndSaveAsCSV()

Dim wbkExport As Workbook
Dim shtToExport As Worksheet

Set shtToExport = ThisWorkbook.Worksheets("Sheet1")     'Sheet to export as CSV
Set wbkExport = Application.Workbooks.Add
shtToExport.Copy Before:=wbkExport.Worksheets(wbkExport.Worksheets.Count)
Application.DisplayAlerts = False                       'Possibly overwrite without asking
wbkExport.SaveAs Filename:="C:\tmp\test.csv", FileFormat:=xlCSV
Application.DisplayAlerts = True
wbkExport.Close SaveChanges:=False

End Sub

More Related Contents:

  1. Saving excel worksheet to CSV files with filename+worksheet name using VB [duplicate]
  2. Want VBA in excel to read very large CSV and create output file of a small subset of the CSV
  3. How to create a separate CSV file from VBA?
  4. How do I get values from a hidden worksheet using VBA [closed]
  5. Excel VBA, code to count the # of filled cells, then find highest and 2nd highest and subtract the corresponding column #’s [closed]
  6. How do I base64 encode a string efficiently using Excel VBA?
  7. Programmatic Access To Visual Basic Project Is Not Trusted
  8. Can I make this macro more efficient or faster?
  9. Conditional Formatting using Excel VBA code
  10. Controlling IE11 “Do you want to Open/Save” dialogue window buttons in VBA
  11. How to get the background color from a Conditional Formatting in Excel using VBA
  12. VBA Excel Populate ListBox with multiple columns
  13. VBA Integer Overflow at 70,000
  14. How to count up text of a different font colour in excel
  15. How to Lock the data in a cell in excel using vba
  16. How to use Events with Option Button Controls on Userform [duplicate]
  17. VBA: Else without If Error
  18. Workbooks.Open Method in VBA
  19. Windows().Activate works on every computer except one
  20. How to highlight a cell using the hex color value within the cell?
  21. Convert RTF (Rich Text Format) code into plain text in Excel
  22. lastrow and excel table.
  23. Open a workbook from VBA and disable Workbook_Open() code?
  24. Creating form programmatically in the module using vba
  25. Find and FindNext for Excel VBA
  26. How do I activate a specific workbook and a specific sheet?
  27. Start VBA macro when editing a cell
  28. VBA Run-time error 438 appears when “paste” runs
  29. If Not function proceeds when value *is* the one specified
  30. Copy an entire worksheet to a new worksheet in Excel 2010

Leave a Comment