Enregistrement automatique fichier excel

Fermé

DERCE - 10 mai 2012 à 15:27
DERCE - 14 mai 2012 à 14:17

Bonjour,
je voudrais indiquer le chemin où ce fichier doit s'enregistrer (il s'enregistre toujours dans mes Documents même en indiquant ce chemin à la fin du code??)

Merci pour vos réponses

Private Sub Workbook_BeforeClose(Cancel As Boolean)
NousSommesLe = Date
NousSommesLe = Replace(NousSommesLe, "/", "")
IlEst = Time
IlEst = Replace(IlEst, ":", "")
IlEst = Left(IlEst, 4)
NomFichier = "Rapport d'Activité Matin " & NousSommesLe
ActiveWorkbook.SaveAs NomFichier
End Sub

A voir également:

Enregistrement automatique fichier excel
Fichier rar - Guide
Liste déroulante excel - Guide
Fichier host - Guide
Fichier iso - Guide
Comment réduire la taille d'un fichier - Guide

1 réponse

Réponse 1 / 1

PHILOU10120 Messages postés 6367 Date d'inscription lundi 16 avril 2012 Statut Contributeur Dernière intervention 2 avril 2024 795
10 mai 2012 à 16:24

ChDir "E:\dossier\sous_dossier\"
ActiveWorkbook.SaveAs Filename:= _
"E:\dossier\sous_dossier\mon_fichier.xlsm", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False

En sélectionnant le chemin complet cela devrait marcher

DERCE
Modifié par DERCE le 14/05/2012 à 14:18

Bonjour Philou,

Je te remercie bcp, j'ai galéré un peu mais j'y suis arrivé...

Merci encore

Discussions similaires

comment donner les droits sur fichier partage

Discussions similaires

Newsletters