Re : sauver 1 feuille
Bonjour,
Macro réalisée avec l'enregistreur
Par exemple, à affecter à un bouton
Sub enregistrer_feuille_toto()
Sheets("toto").Select
Sheets("toto").Copy
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\\Mes documents\Classeur2.xls", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
End Sub