/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 vote168 views1 answer
How to call gcd in vba
VBA
5 votes143 views1 answer
Excel vba low word from Long Integer
VBA
0 vote139 views1 answer
Vba vbcrlf chr
VBA
0 vote118 views1 answer
Excel text to columns line break
VBA
0 vote123 views1 answer
Replace spaces with underscores vbnet
VBA
1 vote142 views1 answer
Export datagridview to excel vb.net
VBA
0 vote127 views1 answer
Vba border weight
VBA
0 vote129 views1 answer
Selecttoken em vbnet e json
VBA
0 vote128 views1 answer
VB Error Code BC30201
VBA
0 vote179 views2 answers
Excel vba store array and write to sheet
VBA