/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

3 votes378 views1 answer
Excel vba make long from two shorts
VBA
0 vote369 views1 answer
Vba integer to double
VBA
0 vote402 views1 answer
Supprimer la valeur de celule vba
VBA
1 vote351 views1 answer
Vba reverse string
VBA
0 vote330 views1 answer
Vba copy paste value only
VBA
1 vote379 views2 answers
Vba string length
VBA
1 vote346 views1 answer
Excel date to unix timestamp
VBA
0 vote349 views1 answer
Vbnet line chart showing extra space
VBA
18 votes512 views3 answers
Excel-vba make integer
VBA
0 vote342 views1 answer
Convert unix to date vba
VBA