/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

5 votes390 views1 answer
Excel vba last byte from INTEGER
VBA
1 vote280 views1 answer
Vba Remove Case Sensitivity
VBA
0 vote361 views1 answer
Vba boolean to string
VBA
0 vote319 views1 answer
Excel vba current folder
VBA
0 vote369 views1 answer
Excel web scraping
VBA
5 votes364 views1 answer
Vba low word from Long Integer
VBA
-1 vote355 views1 answer
VBA check if a cell contains a letter or string
VBA
2 votes326 views1 answer
Vba round number
VBA
0 vote340 views1 answer
Vba html document reference
VBA
0 vote316 views1 answer
Vba add month to date
VBA