Re : une macro pour sauvegarder et fermer un classeur a partir d'un modele
re,
petite erreur oups
Private Sub CommandButton1_Click()
Application.Dialogs(xlDialogSaveAs).Show CStr(ThisWorkbook.ActiveSheet.Range("b1").Value)
Workbooks.Open Filename:="F:\SDPMF\a proposer\test bouton sauvegarde", _
UpdateLinks:=0
ActiveWorkbook.Close
Range("c13:c26,e13:e26,d8,f8").Select
Selection.ClearContents
Workbooks.Open Filename:= _
"F:\SDPMF\a proposer\test bouton sauvegarde.xls"
End Sub
Cordialement