/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 vote142 views1 answer
Vbnet get file name from path
VBA
0 vote155 views1 answer
Vbscript Trim
VBA
3 votes147 views1 answer
Vba make long from two shorts
VBA
0 vote135 views1 answer
Vba word pdf table to excel
VBA
3 votes166 views1 answer
Extract word in a text in excel
VBA
0 vote161 views1 answer
Visual stuiod not recognising desgined labels
VBA
0 vote148 views1 answer
Excel vba formatconditions range
VBA
0 vote139 views1 answer
Do until vb.net
VBA
0 vote144 views1 answer
Telephon call in vba
VBA
2 votes135 views1 answer
Vba array contains
VBA