Macro pour ouvrir fenetre enregistrer sous...+ nom de fichier précis

[keurma]

Bonjour,

Est-il possible par le biais d'une macro de faire en sorte qu'un click sur un bouton ouvre la fenetre ENREGISTRER SOUS... et indique automatiquement dans cette fenetre le nom de fichier "MOUVEMENT DE MATERIEL" suivi de la date du jour.

D'avance merci.

Marc

 

[keurma]

Re : Macro pour ouvrir fenetre enregistrer sous...+ nom de fichier précis

Ok j'ai trouvé pour ce que ca interesse. En A1, on met la date du jour et j'ajoute le nom MOUVEMENT DE MATERIEL

Sub Macro5()
Application.Dialogs(xlDialogSaveAs).Show Range("A1").Value & "MOUVEMENT DE MATERIEL.xls"
End Sub

 

[WDAndCo]

Re : Macro pour ouvrir fenetre enregistrer sous...+ nom de fichier précis

Bonjour le Forum et Keurma

Je crois que la date seras devant alors que tu as demandé l'inverse !

Date = Cells(1, 1)
ActiveWorkbook.SaveAs Filename:= _
"MOUVEMENT DE MATERIEL " & Date & ".xls", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False

Serais mieux a mon avis !
Dominique

 

[keurma]

Re : Macro pour ouvrir fenetre enregistrer sous...+ nom de fichier précis

Merci bien