Enregistrer fichier sur bureau avec nom +date en cellule f1

acmoussu Messages postés 8 Statut Membre -  
f894009 Messages postés 17414 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai fait le code suivant qui ne fonctionne pas , en F1 il y a une date mais l amacro ne la prend pas je ne sais pas pourquoi.

Sub ROPT_BY()
'
' Macro1 Macro
'
ActiveWorkbook.SaveAs Filename:="C:\Users\ANTONY\Desktop\" & Range("F1") & "ROPT BY" & ".xls"
'
End Subme 18.0.966.0</config>
A voir également:

1 réponse

f894009 Messages postés 17414 Date d'inscription   Statut Membre Dernière intervention   1 715
 
Bonjour,

si plusieurs feuilles et feuille active pas celle de votre cellule F1, mettez le nom de la feuille devant Range("F1"):
ex:
WorkSheets("Feuil1").Range("F1")
0