[R] Word 2007 - Modifier Style Objet COM
Posté : mar. 05 mai 2015 18:22
Bonjour à tous !Je souhaiterais pouvoir modifier le style utilisé sur une partie du texte
j'ai tenté plusieurs syntaxes différentes mais aucune ne semble correcte peut être avez vous une idée ?
Merci d'avance pour vos conseils
Code : Tout sélectionner
#include <Word.au3>
Func Main()
$utilisateur = @username & @LF
$ordinateur = @ComputerName & @LF
$servicepack = @OSServicePack & @LF
$cpu = @CPUArch & @LF
$ip = @IPAddress1 & @LF
$domaine = @LogonDomain & @LF
$chemin = @HomePath & @LF
Local $word = ObjCreate("Word.Application")
$word.Documents.add
$word.Visible = 1
$word.Selection.TypeText ($utilisateur & $ordinateur & $servicepack & $cpu & $ip & $domaine & $chemin)
$word.Selection.WholeStory
[b] $word.Selection.style($word.ActiveDocument.Styles("Titre"))[/b]
With $word.Selection.Font
.Name = "Arial"
.Size = 20
.bold = True
.italic = true
.Alignment = "wdAlignParagraphLeft"
.ColorIndex = 2
EndWith
;~ FOR IN ( pour manipuler des collections et des tableaux)
sleep(5000)
$word.ActiveDocument.saveas("d:\informations_utilisateur.doc")
$word.Quit(0)
EndFunc
Main()
