/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 vote223 views1 answer
Excel vba send HTTP POST to server
VBA
0 vote219 views1 answer
Vba dictionary clear
VBA
0 vote197 views1 answer
Vba argument is set
VBA
1 vote208 views1 answer
Vba compile error object required
VBA
0 vote201 views1 answer
Excel vba range contains
VBA
0 vote203 views1 answer
Vb net check if file exists
VBA
0 vote224 views1 answer
How to get value from clipboard in vbnet
VBA
0 vote297 views1 answer
Vba change active sheet
VBA
0 vote204 views1 answer
Vbscript check if string contains
VBA
0 vote220 views1 answer
Excel vba Column Name from Column Number
VBA