/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 votes285 views2 answers
Excel "vba" match last value
VBA
0 vote224 views1 answer
Vba change named range address
VBA
0 vote230 views1 answer
Vba horizontalalignment
VBA
0 vote227 views1 answer
Vbs send keys
VBA
0 vote273 views1 answer
Excel vba protect sheet
VBA
0 vote239 views1 answer
How to get the value of optionbutton in vba
VBA
0 vote219 views1 answer
Excel vba remove formatting from cell
VBA
0 vote186 views1 answer
Vba code to remove leading and trailing spaces
VBA
0 vote257 views1 answer
VBA
VBA
5 votes254 views1 answer
Excel vba get user selected range
VBA