A voir également:
- Macro pour enregistrier un fichier avec nom
- Fichier bin - Guide
- Comment ouvrir un fichier epub ? - 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+
