cs_vinz78
Messages postés207Date d'inscriptionjeudi 24 mai 2007StatutMembreDernière intervention24 juillet 2007
-
4 juin 2007 à 16:44
cs_vinz78
Messages postés207Date d'inscriptionjeudi 24 mai 2007StatutMembreDernière intervention24 juillet 2007
-
5 juin 2007 à 11:44
Salut j'ai ce code :
Public Sub word
Dim fso, MyFile,sRTF
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile(("document.doc"), True)
jrivet
Messages postés7392Date d'inscriptionmercredi 23 avril 2003StatutMembreDernière intervention 6 avril 201260 4 juin 2007 à 16:50
Salut,
J'espere que cela va t'aider
'ajoute en référence au projet
'Microsoft Word 9.0 Object Library (9.0 ou equivalent)
Dim WApp As New Word.Application
Dim MyDoc As Word.Document
Set MyDoc = WApp.Documents.Open(CurDir & "\Document.doc")
MyDoc.Activate
'Si tu veux le fermer par le code
Call MyDoc.Close(True) 'ou false pour ne pas sauver
Call WApp.Quit
Set WApp = Nothing
Set MyDoc = Nothing
, ----
[code.aspx?ID=41455 By Renfield]
cs_vinz78
Messages postés207Date d'inscriptionjeudi 24 mai 2007StatutMembreDernière intervention24 juillet 2007 5 juin 2007 à 09:21
hum je change de requete =)
en fait le but est de lancer avec un bouton un programme pour coller des capture d'écran mais word prendrai beaucoup de place au final...
j'ai pensé à paint mais est ce que l'on peut lancé paint en vb ?
cs_vinz78
Messages postés207Date d'inscriptionjeudi 24 mai 2007StatutMembreDernière intervention24 juillet 2007 5 juin 2007 à 10:51
Objet requis Wscript =/ la dernière fois je men était sortis sans mais la...
ya une commande dan le meme genre que Set WshShell = WScript.CreateObject("WScript.Shell") mais pour wscript ?
cs_vinz78
Messages postés207Date d'inscriptionjeudi 24 mai 2007StatutMembreDernière intervention24 juillet 2007 5 juin 2007 à 11:10
objet requis Wscript O_o je vais craquer la lol je suis allé voir sur des forum et beaucoup de personne on eu ce problème mais j'ai jamais vu de réponse correcte