[resolu]enregister un fichier xls mis a jour.

enregister un fichier xls mis a jour. [resolu] - VB/VBA/VBS - Programmation

Marsh Posté le 26-06-2006 à 15:53:58    

Bonjour a tous,
 
J'ai un fichier xls avec un tableau vierge dedans.
J'ai un programme qui remplit ce tableau au fur et a mesure.  
 
Je cherche simplement un moyen d'enregister le fichier xls avec le tableau dument rempli dans un dossier, et par la meme occaz qu'il ai le meme nom que la valeur d'une de mes txtbox +la date.
 
Merci de votre aide.

Message cité 1 fois
Message édité par Dachocapic le 27-06-2006 à 09:46:40
Reply

Marsh Posté le 26-06-2006 à 15:53:58   

Reply

Marsh Posté le 26-06-2006 à 15:58:02    

Dachocapic a écrit :

Bonjour a tous,
 
J'ai un fichier xls avec un tableau vierge dedans.
J'ai un programme qui remplit ce tableau au fur et a mesure.  
 
Je cherche simplement un moyen d'enregister le fichier xls avec le tableau dument rempli dans un dossier, et par la meme occaz qu'il ai le meme nom que la valeur d'une de mes txtbox +la date.
 
Merci de votre aide.


la ligne suivante te permet de sauvegarder un document

Code :
  1. FichierExcel.ActiveDocument.SaveAs "C:\test.xls"


Message édité par jpcheck le 26-06-2006 à 16:00:53
Reply

Marsh Posté le 26-06-2006 à 16:05:41    

quand tu fis fichierexcel je suposse qu'il faut que je remplace par le nom de mon fichier ?  
 
ca me met variable non definie ?

Reply

Marsh Posté le 26-06-2006 à 16:09:37    

Dachocapic a écrit :

quand tu fis fichierexcel je suposse qu'il faut que je remplace par le nom de mon fichier ?  
 
ca me met variable non definie ?


pardon, j'ai pris une ligne seule, voila l'intégralité du code

Code :
  1. 'definition
  2. Dim FichierExcel As Object
  3. Set FichierExcel = CreateObject("Excel.Application" )
  4. ' Sauvegarde
  5. FichierExcel.ActiveDocument.SaveAs "C:\test.xls"


le FichierExcel est en fait l'objet qui représente ta feuille de travail.
J'avoue ne plus savoir quel nom utiliser pour le cas général... :pt1cable:

Reply

Marsh Posté le 26-06-2006 à 16:15:33    

j'obtiens cette erreur :  
 
erreur d'execution 438  
 
l'objet ne gere pas cette proprieté ou cette méthode
 
tu sais comment regler ca ?  
Merci a toi en tout cas pr ton aide.

Reply

Marsh Posté le 26-06-2006 à 16:24:44    

Dachocapic a écrit :

j'obtiens cette erreur :  
 
erreur d'execution 438  
 
l'objet ne gere pas cette proprieté ou cette méthode
 
tu sais comment regler ca ?  
Merci a toi en tout cas pr ton aide.


Worksheets(1).SaveAs ("c:\test.xls" )  :whistle:

Reply

Marsh Posté le 26-06-2006 à 16:32:52    

FichierExcel.ActiveDocument.Worksheets(1).SaveAs "C:\test.xls" ?  
FichierExcel.Worksheets(1).SaveAs "C:\test.xls" ?  
 
Ca ne marche pas non plus ^^  
 
Pourrais tu me donner ta methode complete pr enregistrer le contenu de textbox de mon programme vb6 dans des cellules excel, puis enregistrer ce fichier excel ? ( quoique la derniere partie tu me la deja donné normalement :) )  
 
Merci.

Reply

Marsh Posté le 26-06-2006 à 16:37:13    

Dachocapic a écrit :

FichierExcel.ActiveDocument.Worksheets(1).SaveAs "C:\test.xls" ?  
FichierExcel.Worksheets(1).SaveAs "C:\test.xls" ?  
 
Ca ne marche pas non plus ^^  
 


Worksheets(1).SaveAs "C:\test.xls"  
tout court
 

Dachocapic a écrit :


Pourrais tu me donner ta methode complete pr enregistrer le contenu de textbox de mon programme vb6 dans des cellules excel, puis enregistrer ce fichier excel ? ( quoique la derniere partie tu me la deja donné normalement :) )  
 
Merci.


pour récupérer le contenu de ta textbox, il te suffit de faire ceci :
Cells(1,1).value=TextBox.Value
Worksheets(1).SaveAs "C:\test.xls"

Reply

Marsh Posté le 27-06-2006 à 09:46:18    

Finalement j'ai trouvé d'ou venait mon probleme, je fermais le classeur  
 
Classeur.Close
Set Classeur = Nothing
AppExcel.Quit
 
 
avant d'enregister. Donc forcement ca marche pas.
 
Merci bcp a toi pour ton aide.

Reply

Sujets relatifs:

Leave a Replay

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