VBA - créer un dossier de sauvegarde et copier fichier

tototiti2008

XLDnaute Barbatruc

• 11 Avril 2011

• #2

Re : VBA - créer un dossier de sauvegarde et copier fichier

Bonjour pepsi,

Oui

tu peux créer un dossier avec MkDir, par exemple, puis sauvegarder un fichier avec SaveAs ou SaveCopyAs

 

Vote positif 0 Vote négatif

pepsi

XLDnaute Occasionnel

• 11 Avril 2011

• #3

Re : VBA - créer un dossier de sauvegarde et copier fichier

Mais je suis obligée de lui indiquer en dur le chemin d'accès pour créer le répertoire avec MkDir , non ?

 

Vote positif 0 Vote négatif

Hippolite

XLDnaute Accro

• 11 Avril 2011

• #4

Re : VBA - créer un dossier de sauvegarde et copier fichier

Bonjour Pepsi
Bonjour Tototiti,
En complément,tu peux aussi modifier automatiquement le nom du fichier et enfin si tu y tiens, tu peux aussi faire apparaître la boite de dialogue d'enregistrement et cerise sur le gâteau, avec nom et répertoire préremplis.
Il suffit de bien préciser ton besoin.
A+

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 11 Avril 2011

• #5

Re : VBA - créer un dossier de sauvegarde et copier fichier

Bonjour Hippolite,
Re,

Il suffit de bien préciser ton besoin.

Cliquez pour agrandir...

+1

Si le nom dur dossier ne doit pas être en dur, d'où doit-il provenir ?
Demande de saisie à l'utilisateur ? Lecture de la valeur d'une cellule ?

 

Vote positif 0 Vote négatif

pepsi

XLDnaute Occasionnel

• 11 Avril 2011

• #6

Re : VBA - créer un dossier de sauvegarde et copier fichier

Bonjour Hippolite, tototiti

Mon besoin :
-une macro qui permet :

- de créer un répertoire qui se situe au même niveau que le fichier excel
- de créer une copie de mon fichier dans ce répertoire

Mais sans indiquer en dur les chemins d'accès, car cette macro va me servir pour plusieurs fichiers, qui peuvent etre dans plusieurs répertoires différents ...

 

Vote positif 0 Vote négatif

pepsi

XLDnaute Occasionnel

• 11 Avril 2011

• #7

Re : VBA - créer un dossier de sauvegarde et copier fichier

le nom du dossier peut etre saisi en dur dans le code, mais pas son chemin d'accès

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 11 Avril 2011

• #8

Re : VBA - créer un dossier de sauvegarde et copier fichier

Bonjour à tous

de créer un répertoire qui se situe au même niveau que le fichier excel

Cliquez pour agrandir...

Normalement, on utilise:

Code:

thisworkbook.path

Pour la syntaxe, appeler Henry 😱.

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 11 Avril 2011

• #9

Re : VBA - créer un dossier de sauvegarde et copier fichier

Bonjour Michel,
Re,

un essai

Code:

Sub CreeDoss()
    MkDir ThisWorkbook.Path & "\tototiti"
    ThisWorkbook.SaveCopyAs ThisWorkbook.Path & "\tototiti\testcopie.xls"
End Sub

 

Vote positif 0 Vote négatif

pepsi

XLDnaute Occasionnel

• 11 Avril 2011

• #10

Re : VBA - créer un dossier de sauvegarde et copier fichier

Excellent ! Merci

Par contre si le dossier existe déja, le code plante

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 11 Avril 2011

• #11

Re : VBA - créer un dossier de sauvegarde et copier fichier

Re,

Et si le fichier existe déjà, il doit être écrasé ?
Comme ça il le sera :

Code:

Sub CreeDoss()
    If Dir(ThisWorkbook.Path & "\tototiti", vbDirectory) = "" Then MkDir ThisWorkbook.Path & "\tototiti"
    ThisWorkbook.SaveCopyAs ThisWorkbook.Path & "\tototiti\testcopie.xls"
End Sub

 

Vote positif 0 Vote négatif

pepsi

XLDnaute Occasionnel

• 11 Avril 2011

• #12

Re : VBA - créer un dossier de sauvegarde et copier fichier

En fait, si cela est possible, le fichier n'est pas écrasé. On peut compléter le nom du fichier avec la date du jour (et l'heure) pour les identifier

 

Vote positif 0 Vote négatif

pepsi

XLDnaute Occasionnel

• 11 Avril 2011

• #13

Re : VBA - créer un dossier de sauvegarde et copier fichier

Je cherche comment ajouter au nom du fichier la date du fichier, l'heure et une révision qui est entrée en cellule A1

 

Dernière édition: 11 Avril 2011

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 11 Avril 2011

• #14

Re : VBA - créer un dossier de sauvegarde et copier fichier

Re,

Tu sais ce qui est le plus fatiguant pour nous, qui acceptons de dépanner des personnes sur Excel ?
C'est de devoir tirer les vers du nez des demandeurs... Serait-il possible de réfléchir à ce que tu souhaites vraiment, si possible dès le début de ta demande, de fournir éventuellement un fichier exemple assez proche de ce que tu veux réaliser ?

On continue, question suivante

et une révision qui est entrée en cellule A1

Cliquez pour agrandir...

à quoi ressemble cette révision, et dans la cellule A1 de quelle feuille se trouve-t-elle ?

Si tu avais fourni un fichier, et réfléchi à l'avance à ce que tu veux vraiment, je pense que tu aurais eu une réponse satisfaisante il y a 2 heures...

 

Vote positif 0 Vote négatif

pepsi

XLDnaute Occasionnel

• 12 Avril 2011

• #15

Re : VBA - créer un dossier de sauvegarde et copier fichier

Bonjour le forum, tototiti2008

le numéro de révision c'est juste un nombre (qui peut être 1, 2 ,3 etc.....)

La feuille s'appelle feuil1

 

Vote positif 0 Vote négatif