Macro pour enregistrer dans 2 endroits

Boulie72 -  
 Boulie72 -
Bonjour,

J'ai un fichier excel que je souhaite recopier automatiquement lorsque je l'enregistre dans un deuxième chemin.

Le premier chemin ou se situe le fichier est : "\\s34bgxem109\traction_freinage\ADPX\Congés unité TF\Congés unité TF 2013.xls"

Le second chemin ou je veux recopier mon fichier est : \\s34bgxem109\ELECTRIQUE

Quelqu'un peut il m'aider svp?

Merci d'avance.

Guillaume

1 réponse

  1.
    Morgothal Messages postés 1350 Statut Membre 184
     
    Bonjour,
    Avec une macro de ce type ? 

    With ActiveWorkbook
.SaveAs Filename:="\\s34bgxem109\traction_freinage\ADPX\Congés unité TF\Congés unité TF 2013.xls" 
.SaveAs Filename:="\\s34bgxem109\ELECTRIQUE\Congés unité TF 2013.xls" 
End With

    0
    1. Boulie72
       
      Et non désolé ca ne marche pas!!!
      0
    2. Morgothal Messages postés 1350 Statut Membre 184
       
      Chez moi ça fonctionne...
      Il y a un message d'erreur ?
      0
      1. Boulie72 > Morgothal Messages postés 1350 Statut Membre
         
        Non pas de message d'erreur. Je colle la macro ds thisworkbook et quand je clique sur enregistrer il ne se passe rien!
        0
    3. Morgothal Messages postés 1350 Statut Membre 184
       
      Il faudrait coller ceci dans ThisWorkbook : 
      Sub enregistrer ()
With ActiveWorkbook
.SaveAs Filename:="\\s34bgxem109\traction_freinage\ADPX\Congés unité TF\Congés unité TF 2013.xls" 
.SaveAs Filename:="\\s34bgxem109\ELECTRIQUE\Congés unité TF 2013.xls" 
End With
End Sub

      Et exécuter cette macro via un bouton dans le classeur ...
      0
    4. Boulie72
       
      On progresse...
      Maintenant cela marche une fois mais dès que j'essaie de le faire une seconde, il y a une erreur 400!
      0

Discussions similaires

Comment faire le signe au carré ² sur iPhone ?
Chloe0007 -
Jaks- -

5 réponses