aide sur macro d'enregistrement

[survivor]

Bonjour
Autodidacte, je n'arrive pas àcréer une macro automatisant 'enregistrer sous' pour les utilisateursd'un planning, voici les éléments:
la macro doit enregistrer le classeur actif dénommé '59390D.xlt' dans le répertoire K:\\plannings sous le nom 'planning&date'.xls, laquelle date se trouve dans la cellule C1 (par exemple) et fermer le classeur actif (au passage le classeur modéle actif devient *.xls)
J'espére avoir été clair, merci pour votre aide 🙂

 

[sousou]

Bonjour,

C'est sans doute le format de la date qui doit te géner.

Transforme ta date.

ActiveWorkbook.SaveAs ('planning' & Day(Range('a1')) & '_' & Month(Range('a1')) & '_' & Year(Range('a1')))

 

[Denis]

bonjour survivor , soussou et le Forum
ci dessous un petit exemple

Dim NameClasseur$
NameClasseur = 'Planning' & Sheets(1).Range('C1').Value & '.xls'
ActiveWorkbook.SaveAs Filename:= _
'K:\\Planning\\NameClasseur, FileFormat:=xlNormal'
End Sub

à adapter
Bon courage & à +
Denis

 

[Denis]

bonjour survivor , soussou et le Forum
ci dessous un petit exemple

Dim NameClasseur$
NameClasseur = 'Planning' & Sheets(1).Range('C1').Value & '.xls'
ActiveWorkbook.SaveAs Filename:= _
'K:\\Planning\\NameClasseur, FileFormat:=xlNormal'
End Sub

à adapter
Bon courage & à +
Denis

 

[survivor]

Merci pour votre aide, mais quelque chose m'échappe, je préfére vous soumettre mon travail, pour me donner encore un coup de pouce.
Merci d'avance

 

[Denis]

Re Bonjour survivor et le Forum
désolé, mais les barres obliques ne sont pas passées
(barre oblique avec 'AltGr' & la touche 8 au dessus de ton clavier alpha)
il en faut une devant 'Planning'
une autre devant 'NameClasseur'
j'espère que ce sera OK comme celà
à+
Denis

 

[survivor]

Merci
mais malgré les barres obliques, ça bogue 😱 je joins la feuille sur laquelle s'exercera la macro (elle doit être 'enregistrée sous': 'planning&contenu cellule c3 avec extension xls.
dsl mais la feuille dépasse un peu les 5 k°
A+ 🙂

 

[survivor]

survivor écrit:

Merci
mais malgré les barres obliques, ça bogue 😱
A+ 🙂

Ouf ! j'avais laisser traîner des guillemets, maintenant ça marche
A+ 🙂