Enregistrer classeur excel sous nom origine ds autre repertoire

Tarik -  
ccm81 Messages postés 10908 Date d'inscription   Statut Membre Dernière intervention   - 4 juil. 2017 à 18:43
Bonjour,

Je voudrai savoir comment ecrire mon code pour que la macro enregistre un fichier excel recu par email dans un repertoire bien précis tout en conservant imperativement le nom d'origine du fichier. En effet le fichier envoyé par email est deja correctement nomé et daté avec la date du jour.

Merci d'avance !


A voir également:

2 réponses

Réponse 1 / 2
ccm81 Messages postés 10908 Date d'inscription   Statut Membre Dernière intervention   2 432
 
Bonjour

Essaies ceci 

Const chemin = "D:\Travail\"

Private Sub CommandButton1_Click()
Dim nomfic As String
nomfic = ActiveWorkbook.Name
ActiveWorkbook.SaveAs (chemin & nomfic)
End Sub

Cdlmnt
0

Discussions similaires

Je ne peut plus ouvrir mes dossier sur le bureau...
Olivier -
fabul -

3 réponses
lister les fichiers d'un répertoire
vayleme -
barnabe0057 -

3 réponses
Macro enregistrer PDF dans dossier spécifique
Aline -
Aline -

2 réponses
Fichiers .htaccess ne fonctionnent pas ?
rcsofficiel -
avion-f16 -

2 réponses
L'explorateur de fichiers/Dossiers ne s'ouvrent plus
-Sakuto- -
vahona -

7 réponses
envoyer un fichier pdf par email
delavega470 -
delavega470 -

7 réponses