/VBA/Excel vba export sheet as a csv without losing focus of my current workbook

Excel vba export sheet as a csv without losing focus of my current workbook

'VBA function to save current worksheet as a CSV file without losing
'focus. The CSV file is saved in the same directory as the current
'workbook. The Local Separator is utilized:

Sub SaveSheetAsCSV()
  With ActiveSheet
    .Copy
     ActiveWorkbook.SaveAs Left(.Parent.Name, InStrRev(.Parent.Name, ".")) & .Name & ".csv", xlCSV, Local:=True
     ActiveWorkbook.Close False
    .Activate
  End With
End Sub

Source: academy.excelhero.com

Similar codes

0 vote338 views1 answer
Excel vba existence of a file
VBA
0 vote377 views1 answer
Excel vba ternary
VBA
1 vote362 views1 answer
S yyyy-MM-dd HH:mm:ss Short Date Local
VBA
0 vote375 views1 answer
Vba round to 2 decimals
VBA
1 vote357 views1 answer
Extract the second word in a text in excel
VBA
0 vote346 views1 answer
Vba format currency
VBA
0 vote374 views1 answer
Vbnet check if sting contians symbols
VBA
0 vote340 views1 answer
Excel autofilter vba
VBA
0 vote342 views1 answer
How to use VBA to add new record in MS Access?
VBA
5 votes938 views1 answer
Vlookup vba
VBA