/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

-1 vote277 views1 answer
How to correct a number to 2 decimal places in vba
VBA
0 vote314 views1 answer
Find control with name vb
VBA
0 vote241 views1 answer
Excel vba automatic calculation
VBA
0 vote237 views1 answer
Vba open report
VBA
0 vote241 views1 answer
Excel run macro every 5 minutes
VBA
20 votes532 views1 answer
Excel vba recursive example factorial function
VBA
3 votes227 views1 answer
Excel vba get the workbook full file name with path
VBA
3 votes268 views2 answers
Vba active workbook path
VBA
0 vote237 views1 answer
Vba file chooser
VBA
0 vote244 views1 answer
Vba count all row
VBA