/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 votes296 views1 answer
Excel vba make long from two shorts
VBA
5 votes299 views1 answer
Excel vba low word from Long Integer
VBA
0 vote261 views1 answer
Vb net show lines for all axis labels in chart
VBA
0 vote273 views1 answer
Thread sleep vb
VBA
15 votes366 views1 answer
Excel vba wait
VBA
0 vote273 views1 answer
Excel vba move down to next visible cell
VBA
0 vote278 views1 answer
How to add line graph vb net
VBA
0 vote263 views1 answer
Vba code to select image in sheet
VBA
0 vote290 views1 answer
Excel vba paste all to each sheet in workbook
VBA
0 vote252 views1 answer
Vbide vbproject reference
VBA