enrgistrement d'un classeur

[al1000]

Bonjour,

Je veux enregistrer un classeur mais je veux que la date sot modifiée par l'opérateur par une inputbox:"mettre la date svp"

voici ma macro


' Macro1 Macro

ChDir "F:\excel"

ActiveWorkbook.SaveAs Filename:="F:\excel\mqts 02 02.xls", FileFormat:= _
xlExcel8, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False

Range("A2").Select
End Sub



a+

 

[RENAUDER]

Re : enrgistrement d'un classeur

Bonjour,

ChDir "F:\excel"
    Madate = InputBox("Saisissez une date", "Saisie de date")
    If Madate = "" Then End
    ActiveWorkbook.SaveAs Filename:="F:\excel\mqts " & Madate & "xls", _
        FileFormat:=xlExcel8, Password:="", WriteResPassword:="", _
        ReadOnlyRecommended:=False, CreateBackup:=False
    Range("A2").Select

 

[al1000]

Re : enrgistrement d'un classeur

Bonjour,


merci


a+