ouvrir fichier excel et saisir info

bonjour, alors je lis et relis ,mais je comprends pas vraiment , voila mon probleme :
je souhaite faire un vbscript de facon a le mette dans le schedule de window pour ,:
ouvrir un fichier excel qui s'appelle "toto" sur le c: et remplir la case d:5 en y inscrivant "PP" puis refermer en sauvegardant .
commebnt faire cela ???
merci de votre aide
:yaisse2:

et tu en est ou ?

tu as essayai :

Comment piloter Excel pour créer un classeur.xls ?

bonjour ,
j'en suis ici :

------------------------------

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Dim xlapp, classeur, feuille   Set xlapp = CreateObject("Excel.Application") xlapp.Visible = True Set classeur = xlapp.Workbooks.add Set feuille = xlapp.ActiveSheet feuille.Range("A1") = "Rajout du texte en cellule A1" Classeur.Saveas "c:\tmp\MonClasseur" classeur.Close True 'quitte en sauvant   xlApp.quit Set classeur = Nothing Set xlapp = Nothing

---

--------------------------


et je cherche comment faire pour ne pas avoir le message demandant confirmation pour enregistrement sur le fichier existant....

et je cherche aussi comment faire pour clicquer sur un bouton dans ce meme document excel ( bouton avec petit macro compteur).

avant le saveas rajoute la ligne :

Code:

---

xlapp.DisplayAlerts = False

---

ensuite c'est un nouveau classeur donc il n'y as pas de bouton à cliquer !

Il est censé faire quoi ton bouton ..? tu peu mettre le code correspondant dans ton VBScript .. où appeller une 'macro' grâce à :

Code:

---

xlapp.run "MaMacro"

---

j'ai essayer de rajouter une ligne :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Dim xlapp, classeur, feuille Set xlapp = CreateObject("Excel.Application") xlapp.Visible = True Set classeur = xlapp.Workbooks.add Set feuille = xlapp.ActiveSheet feuille.Range("D5") = "PP" waExcel.Application.DisplayAlerts = false Classeur.Saveas "c:\toto.xls" classeur.Close True xlApp.quit Set classeur = Nothing Set xlapp = Nothing

---

mais j'ai un message d'erreur:windows script host me disant ligne 8 , objet requis 'wbexcel'

je sais pas...

ha ok je teste ,

impec , cela fonctionne
pour la macro , elle n'est pas encore ecrite , mais je dois faire un genre de bouton qui va incrementer un compteur ...
je la fais de suite et reviens plus tard , merci deja pour votre aide.

arff , jai encore un probleme
quand j'ajoute un bouton formulaire a mon fichier excel avec une macro , et que je fais tourner le script , il remplis bie ma case D5 , mais mon bouton et ma macro on disparue...????

pour etre meme plus precis , le scrip "efface " tous sauf la case D5

Bbil , ah oui en relisant ton 1 er message , je comprends , moi je voudrais que cela ouvre un fichier EXISTANT et non pas en creer un .

ok cela fonctionne , merci

pour les suivant voici le code :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Dim xlapp, classeur, feuille Set xlapp = CreateObject("Excel.Application") xlapp.Visible = True Set classeur = xlapp.Workbooks.Open("c:\toto.xls") Set feuille = xlapp.ActiveSheet feuille.Range("D5") = "PP" xlapp.run "Macro1" xlapp.DisplayAlerts = False   Classeur.Saveas "c:\toto.xls" classeur.Close True xlApp.quit Set classeur = Nothing Set xlapp = Nothing

---

merci
:yaisse2: