/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 vote162 views1 answer
Add Formula to Shape Text in VBA
VBA
0 vote161 views1 answer
Vba argument is set
VBA
0 vote185 views1 answer
Vba multiple optional arguments
VBA
0 vote188 views1 answer
Excel vba protect sheet
VBA
2 votes128 views1 answer
Excel vba pause
VBA
0 vote188 views1 answer
Excel vba first column in range
VBA
0 vote187 views1 answer
Add text to Shape VBA
VBA
0 vote177 views1 answer
Vba string
VBA
0 vote176 views1 answer
Vb get ip address
VBA
6 votes171 views1 answer
Excel vba get the path of current workbook
VBA