Macro pour enregistrier un fichier avec nom
Dan
-
Bidouilleu_R Messages postés 1209 Statut Membre -
Bidouilleu_R Messages postés 1209 Statut Membre -
Bonjour,
Je désire créer une macro pour enregistrer un fichier en lui assignant un nom contenu dans une cellule (disons A1). Comment faire?
Merci et bonne fin de journée.
Dan
Je désire créer une macro pour enregistrer un fichier en lui assignant un nom contenu dans une cellule (disons A1). Comment faire?
Merci et bonne fin de journée.
Dan
Configuration: Windows XP Internet Explorer 7.0
A voir également:
- Macro pour enregistrier un fichier avec nom
- Comment ouvrir un fichier epub ? - Guide
- Fichier bin - Guide
- Comment réduire la taille d'un fichier - Guide
- Fichier rar - Guide
- Fichier .dat - Guide
1 réponse
bonjour,
dans un module,
Sub sauvefichier()
dim nomdufichier as string
'nomdufichier contient le nom et j'ajoute l'extension xls
'puis on enregistre sous ....
nomdufichier = Range("a1").Value & ".xls"
ActiveWorkbook.SaveAs (nomdufichier)
End Sub
il y a d'autres solutions avec Application.FileDialog(msoFileDialogSaveAs).Show
la saisie devient manuelle
A+
dans un module,
Sub sauvefichier()
dim nomdufichier as string
'nomdufichier contient le nom et j'ajoute l'extension xls
'puis on enregistre sous ....
nomdufichier = Range("a1").Value & ".xls"
ActiveWorkbook.SaveAs (nomdufichier)
End Sub
il y a d'autres solutions avec Application.FileDialog(msoFileDialogSaveAs).Show
la saisie devient manuelle
A+
