/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 vote336 views2 answers
Excel vba number format file size
VBA
0 vote309 views1 answer
Excel vba disable keyboard input
VBA
1 vote318 views1 answer
Excel vba saveas force overwrite
VBA
5 votes342 views1 answer
Vba low word from Long Integer
VBA
0 vote345 views1 answer
Vba nested dictionary
VBA
1 vote314 views1 answer
How to INPUT text in shape with enter and spacein vba
VBA
0 vote352 views1 answer
If statement vdhl
VBA
0 vote317 views1 answer
Vba table header name
VBA
0 vote325 views1 answer
Excel vba disable screen update
VBA
0 vote322 views2 answers
Open url from vba
VBA