Sauvegarder sous + chemin ?
Résolu
JeanPedre
Messages postés
5
Date d'inscription
Statut
Membre
Dernière intervention
-
ccm81 Messages postés 10909 Date d'inscription Statut Membre Dernière intervention -
ccm81 Messages postés 10909 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- Sauvegarder sous + chemin ?
- Sauvegarder favoris chrome - Guide
- Sauvegarder sms iphone - Guide
- Sauvegarder favoris firefox - Guide
- Mes photos sauvegarder sur google - Guide
- Comment sauvegarder toutes les données de mon téléphone - Guide
3 réponses
Bonjour
Cdlmnt
Const chenim = "D:\" Public Sub ok() Dim nomfic As String nomfic = chenim & [Feuil1!F12].Value & ".xls" ActiveWorkbook.SaveAs Filename:=nomfic End Sub
Cdlmnt
Je t'ai mis le code dans une procedure independante
' à toi de modifier le "chemin" du fichier but
et tu remplaces dans ton module
ActiveWorkbook.SaveAs Filename:=[Feuil1!F12].Value & ".xls"
par
chemin= "D:\"
nomfic = chemin & [Feuil1!F12].Value & ".xls"
ActiveWorkbook.SaveAs Filename:=nomfic
Si toujours erreur, que vaut la variable nomfic ?
Cdlmnt
' à toi de modifier le "chemin" du fichier but
et tu remplaces dans ton module
ActiveWorkbook.SaveAs Filename:=[Feuil1!F12].Value & ".xls"
par
chemin= "D:\"
nomfic = chemin & [Feuil1!F12].Value & ".xls"
ActiveWorkbook.SaveAs Filename:=nomfic
Si toujours erreur, que vaut la variable nomfic ?
Cdlmnt
Merci pour ta réponse mais elle ne marche pas.
Excel me renvoi le message d'erreur suivant : "Attendu : numéro de ligne ou étiquette ou instruction ou fin d'instruction"