Modifier un fichier excel et l'enregistrer dans un autre repertoire

Modifier un fichier excel et l'enregistrer dans un autre repertoire - VB/VBA/VBS - Programmation

Marsh Posté le 08-02-2007 à 17:17:15    

Ce post fait suite à un précédent sujet : http://forum.hardware.fr/hfr/Progr [...] 1149_1.htm
 
A la fin de mon traitement, j'ai un certains nombre de variables. Je dois renseigner un fichier excel avec ces variables. Je dois donc l'ouvrir, renseigner certaines cellules bien précise puis faire une sorte "d'enregistrer sous" dans un répertoire particulier (il faut que le fichier que j'ai ouvert reste intact).
 
Pour l'instant, je me contente de l'ouvrir, de le laisser réduit, de le modifier et de le fermer.  
 
Code:
 

Code :
  1. Workbooks.Open PathTemplate
  2.    Worksheets("Modele de CO" ).Cells(14, 2).Value = formation
  3.     ActiveWorkbook.Close savechanges:=True


 
J'aimerais savoir comment faire cette commande enregistrer-sous et si possible ne pas ouvrir le fichier original. J'ai vu qu'il fallait passer par des commandes ADO mais je ne suis pas arrivé à les faire fonctionner...
 
Merci d'avance pour votre aide  :)

Reply

Marsh Posté le 08-02-2007 à 17:17:15   

Reply

Marsh Posté le 08-02-2007 à 19:22:11    

et pourquoi tu fais pas l'inverse
tu copie ton fichier dans le bon repertoire
tu le modifie
et tu l'enregistres

Reply

Marsh Posté le 09-02-2007 à 09:05:52    

ingenieurcesi a écrit :

et pourquoi tu fais pas l'inverse
tu copie ton fichier dans le bon repertoire
tu le modifie
et tu l'enregistres


 
Parce que tout doit-être automatique, pas de copier/coller à la main. [:whyme]  

Reply

Marsh Posté le 09-02-2007 à 15:51:10    

copyfolder
name ... as ....
ca peut etre fait automatiquement !!!

Reply

Marsh Posté le 09-02-2007 à 15:51:30    

pardon c'est copyfile et pas copyfolder

Reply

Marsh Posté le 09-02-2007 à 18:25:09    

Set cp1 = CreateObject("Scripting.FileSystemObject" )
cp1.CopyFile source, destination[, overwrite]
 
et y a aussi l'enregistrement de macro qui peut t'aider (mais pas forcement pour ton problème )

Reply

Marsh Posté le 27-10-2007 à 11:42:46    

skystef2 a écrit :

Ce post fait suite à un précédent sujet : http://forum.hardware.fr/hfr/Progr [...] 1149_1.htm
 
A la fin de mon traitement, j'ai un certains nombre de variables. Je dois renseigner un fichier excel avec ces variables. Je dois donc l'ouvrir, renseigner certaines cellules bien précise puis faire une sorte "d'enregistrer sous" dans un répertoire particulier (il faut que le fichier que j'ai ouvert reste intact).
 
Pour l'instant, je me contente de l'ouvrir, de le laisser réduit, de le modifier et de le fermer.  
 
Code:
 

Code :
  1. Workbooks.Open PathTemplate
  2.    Worksheets("Modele de CO" ).Cells(14, 2).Value = formation
  3.     ActiveWorkbook.Close savechanges:=True


 
J'aimerais savoir comment faire cette commande enregistrer-sous et si possible ne pas ouvrir le fichier original. J'ai vu qu'il fallait passer par des commandes ADO mais je ne suis pas arrivé à les faire fonctionner...
 
Merci d'avance pour votre aide  :)


Reply

Marsh Posté le 27-10-2007 à 11:51:05    

utilise l'instruction :
 
.ActiveWorkbook.SaveAs ("chemin_complet\nomdufichier" )
 
pour ne pas voir le classeur en cours de modification il faut définir l'Application en  
.Visible = False
tout ton travaille se fera en 'toile de fond'

Reply

Sujets relatifs:

Leave a Replay

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