Macro Enregistre avec demande d'un N° de fichier

[mavean]

Bonjour à tous
J'ai réalisé une macro qui enregistre dans c:\Users\
le fichier nomé "FICHIER POUR RENTRER LES STOCKS S4"
S4 voulant dire semaine 4
Je souhaiterais que la macro me demande le N° de semaine et donc selon ma réponse change la fin du nom du fichier en S5 S6 etc...
Qui peut me l'écrire, Merci d'avance.

Voila ma macro :
ChDir "C:\Users"
ActiveWorkbook.SaveAs Filename:= _
"C:\Users\FICHIER POUR RENTRER LES STOCKS S4.xls", FileFormat:=xlExcel8, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False

 

[CPk]

Re : Macro Enregistre avec demande d'un N° de fichier

Bonjour, essayez

semaine = inputbox("Numéro de semaine ?")
"C:\Users\FICHIER POUR RENTRER LES STOCKS S" & semaine &".xls"

 

[CPk]

Re : Macro Enregistre avec demande d'un N° de fichier

Bonjour, essayez

semaine = inputbox("Numéro de semaine ?")
"C:\Users\FICHIER POUR RENTRER LES STOCKS S" & semaine &".xls"

 

[mavean]

Re : Macro Enregistre avec demande d'un N° de fichier

Merci beaucoup cela marche NICKEL.
Bonnes fêtes de Noel

 

[CPk]

Re : Macro Enregistre avec demande d'un N° de fichier

pareillement et merci pour le retour

 

[Lone-wolf]

Re : Macro Enregistre avec demande d'un N° de fichier

Bonjour mavean, CPK


Avec msgbox, combobox pour choix de semaine et userform.



A+