Discussion :

[Thom@s]

Bonjour,

je cherche un moyen en VBScript de piloter Word pour qu'il ouvre un document et effectue un certain nombre d'actions dessus en utilisant les commandes des menus(select all, refresh,...).
Est-ce que c'est possible en VBScript et surtout est-ce que je peux piloter plusieurs session de Word sur la même machine?


Merci pour votre aide.

[SfJ5Rpw8]

ben oui... mais pourquoi plusieurs sessions...
tiens un exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
 
Dim WordApp 'As Word.Application
Dim WordDoc 'As Word.Document
 
Set WordApp = CreateObject("Word.Application")     '-- ouvre une session Word
WordApp.Visible = True
Set WordDoc = WordApp.Documents.Add    '-- crée un nouveau document
WordApp.Selection.TypeText "Rajout de texte"
WordDoc.SaveAs "C:\monDocument.doc"    '-- enregistre le nouveau doc

largement inspiré de la VBA ...

Manipuler WORD

[Thom@s]

Plusieurs sessions pour pouvoir générer 15000 rapports en parallèle.
Quid des performances...


Merci

[SfJ5Rpw8]

Plusieurs sessions pour pouvoir générer 15000 rapports en parallèle.
Quid des performances...


Merci

?? tu veu lancer en simultané 15000 fois Word sur ta machine

[Thom@s]

Non, je vais eviter mais je peux créer par exemple 10 chaines qui s'exécutent en //.

[Iceman421]

On peut aussi jouer sur la taille et la police :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Set objWord = CreateObject("Word.Application")
 
objWord.Visible = True
Set objDoc = objWord.Documents.Add()
Set objSelection = objWord.Selection
 
'Ecriture avec paragraphe et taille
objSelection.Font.Name = "Arial"
objSelection.Font.Size = "18"
objSelection.TypeText "Texte dans Word"
objSelection.TypeParagraph()
 
objSelection.Font.Size = "14"
objSelection.TypeText "" & Date()
objSelection.TypeParagraph()

C'était pour ceux que ça intéresse!

[ced600]

Je n'ai pas dev de script qui travaille avec word, mais je me disais qu'il doit être possible d'ouvrir plusieurs document (10) sur une seule session et de travailler en parrallele dessus (apres tout on peut le faire à la main).
Je pense que cette solution serais moins consommatrice de ressource qu'ouvrir 10 sessions word (et donc 10 instances de l'application).