HELP! saving as xls in current folder

  • Thread starter Thread starter drumerboy
  • Start date Start date
D

drumerboy

This code saves xls sheets as a csv files. BUT I do not know:
1. how to save them as xls.
2. how to save in the parent current folder

For i = 1 To nr
Nume = Cells(i + 2, 1)
Worksheets(Nume).Activate
Fisier = "C:\Back-up\Developers\Mario\" & Nume & ".csv"
ActiveSheet.SaveAs Fisier, xlCSVWindows
Worksheets("SA 200").Activate
Next i
End Sub

Please help me
 
Quickest way to find this type of info out is to record a macro that saves
the sheet where you want it saved. Then edit the macro and copy it and paste
it into the code you have below.

HTH
 
Back
Top