Bonjour,
J'ai un petit problème avec ce code :
Code :
- Sub Main
- Dim remoteItem As Object
- Set remoteItem = Nothing
- MsgBox("I'll try to create a Word object" )
- Set remoteItem = CreateObject("Word.Application" )
-
-
- remoteItem.Documents.Add
- With remoteItem.Selection
- .TypeParagraph
- .TypeText Text:="J'écrit des trucs dans une page word automatiquement"
- .TypeParagraph
- .TypeText Text:="Fin du test, bye"
- .TypeParagraph
- End With
- remoteItem.Visible = True
- MsgBox("Pause" )
- Set remoteItem = Nothing
- End Sub
|
Qui fonctionne tres bien si je le lance d'une application lancée en fenêtre 'dos', mais si l'application est un service windows, il ne fait 'rien' : Il ne plante pas, mais il n'ouvre pas Word ...
Vous avez des idées du pourquoi du comment ?
Merci d'avance
Message édité par didier1809 le 13-04-2006 à 13:56:24
---------------
.