Créer une sauvegarde de fichier (macro VBA)

Ruli1-85 Messages postés 20 Statut Membre -  
lermite222 Messages postés 9042 Statut Contributeur -
Bonjour,
Je suis étudiant en stage dans une entreprise et j'ai encore du mal à programmer des macros.
Je voudrai savoir quel est le code d'une macro afin de faire une copie parfaite d'un fichier qui est en utilisation, tout en restant sur le fichier d'utilisation.
Je l'activerai avec un bouton, mais ca ce n'est pas le soucis.

Avez vous deja eu ce cas là, si oui pouvez vous me donner le code?

Voici quelque indication:
- emplacement du fichier à copier: C:\Users\Moi\Documents\Société\Projet\Etude1A23\*
Nom du fichier source: GMAO étude
- emplacement où je doit le copier: C:\Users\Moi\Documents\Société\GMAO\
Nom du fichier source: Logiciel GMAO

je voudrai que cette copie se fasse directement à partir du fichier Excel source.

J'utilise la suite office 2007 sur un ordi sous XP
Configuration: Windows Vista / Firefox 3.6

2 réponses

  1.
    lermite222 Messages postés 9042 Statut Contributeur 1 199
     
    Bonjour,
    A toi de voir si les noms sont exact... 
        Workbook("GMAO étude.xls").SaveCopyAs "C:\Users\Moi\Documents\Société\GMAO\GMAO.xls"


    Si tu veux le faire plusieur fois et éviter l'alerte que le classeur existe déja... 
        Application.DisplayAlerts = False
    Workbook("GMAO étude.xls").SaveCopyAs "C:\Users\Moi\Documents\Société\GMAO\GMAO.xls"
    Application.DisplayAlerts = True

    A+
    1
    1. Ruli1-85 Messages postés 20 Statut Membre
       
      Je te remercie d'avoir répondu aussi rapidement.
      Mais j'ai entré tes lignes de programme et il m'affiche
      "erreur de compilation
      Sub ou function non définie"

      Voici les lignes précises que j'ai entré:

      Sub Bouton432_Clic()
      Workbook("Fabielor.xls").SaveCopyAs "C:\Users\Ruli1\Desktop\Projet\GMAO + Stock\Sauvegarde\GMAO.xls"
      End Sub

      j'ai essayé sous plusieur forme et avec l'aide mais je n'y arrive pas. Je ne suis pas doué du tout sur VB mais j'essaye et j'ai que ce "programme" à faire

      Sais tu ou est l'erreur?
      0
  2. lermite222 Messages postés 9042 Statut Contributeur 1 199
     
    Tu a probablement une erreur dans les chemins, ou dans les noms de classeurs, ATTENTION aux espaces qui sont souvent ajouter sans que l'ont en s'en aperçoive.
    Exemple : double clic sur "Exemple" et sur "Exemple " ,c'est pas la même chose, sur CCM ça se vois bien mais dans l'explorateur beaucoups moins.

    Je ne crois pas que le signe + est autoriser par Excel.
    A+
    0