VBA Excel - Enregistrer un document dans 2 répertoires différents

VBA Excel - Enregistrer un document dans 2 répertoires différents - VB/VBA/VBS - Programmation

Marsh Posté le 30-01-2006 à 12:48:37    

Bonjour à tous,
 
Je débute en macro sous VBA (sous Excel)
Je recherche le moyen d'enregistrer un fichier Excel dans 2 répertoires différents.
Un fichier aura l'extention .txt et l'autre .xls
 
J'ai vraiment tenter plein de truc, j'ai plus ou moins réussi mais c'est vrament fastidieux. Il dois y avoir bien plus simple.
 
Voila le projet en quelques lignes :
 
La macro importe la page HTML d'un site (autorisé par le dit site)
La page importer est déplacé dans le workbook excel, un formatage du fichier selon mes besoins est effectué.
Tout ça, pas de problème.
 
Ensuite je souhaite sauvegarder le resultat de ce formatage.
1) Dans 2 repertoires différents. Exemple :  
    - C:\Mes Fichiers\Traité
    - D:\Résultat\Site
 
 
2) Avec 2 noms différents. Exemple :
    - Resultat_Site_"date"_"heure".xls
    - LeResultat_OK_"date"_"heure".txt
Ou "date" et "heure" sont la date et l'heure ou le fichier à été traité (ou généré peut importe)
 
Tout cela sans modifier le nom du fichier source qui contient la macro qui : Importe, formate, sauvegarde.
 
 
Mille merci aux personnes qui pourraient m'aider.
Si je n'ai pas été assez clair dans mes explications n'hesitez pas à me demander plus d'info.
 
Merci encore et bonne journée à tous.  :)  

Reply

Marsh Posté le 30-01-2006 à 12:48:37   

Reply

Marsh Posté le 30-01-2006 à 13:56:57    

salut altarez
 
voici les fonctions pour enregistrer dans tes 2 fichiers
 
ActiveWorkbook.SaveAs Filename:="C:\Mes Fichiers\Traité\LeResultat_OK_"date"_"heure".txt", FileFormat:=xlNormal
ActiveWorkbook.SaveAs Filename:="D:\Résultat\Site\Resultat_Site_"date"_"heure".xls", FileFormat:=xlText
 
par contre attention à tes date un "/" sera interprété comme un nouveau dossier
ceci enregistre le classeur tel qu'il est (pour le .xls) avec les macros et tout, sinon il faut que tu copie tes données créer un classeur colle les valeurs et le format puis enregistre sous le différents noms.

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed