/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 vote375 views2 answers
Vba find last row in range for certain criteria
VBA
2 votes329 views1 answer
Vba round number
VBA
1 vote331 views1 answer
How to check is the value enterd is a number or text in vba
VBA
0 vote318 views1 answer
Vbnet display all axis labels in cahrt
VBA
0 vote338 views1 answer
Worksheet.pastespecial textbox
VBA
0 vote313 views1 answer
Vba copy paste value only
VBA
0 vote336 views1 answer
Excel vba textbox forecolor disabled
VBA
0 vote328 views1 answer
Vbs
VBA
8 votes367 views1 answer
Excel vba determine number of elements in a 1D array
VBA
0 vote350 views1 answer
Vba array dimensions
VBA