/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 votes296 views1 answer
Xl vba double quotes in string literal
VBA
1 vote239 views1 answer
Vba exit do while
VBA
0 vote284 views1 answer
Vba get application version
VBA
0 vote278 views1 answer
Combobox dropdown search visual basic -excel -C#
VBA
6 votes319 views1 answer
Excel vba isalpha
VBA
0 vote307 views1 answer
VBA
VBA
0 vote298 views1 answer
Vba add spaces
VBA
0 vote279 views1 answer
Vbnet check if number is even or odd
VBA
0 vote265 views1 answer
Excel vba assign shortcut key to button
VBA
0 vote290 views1 answer
Excel vba StartUpPosition
VBA