Néanmoins, si je ne sais pas combien de paragraphes compte le document, ou que j'ouvre un document qui contient déjà du texte, comment puis-je faire pour définir un "range" correspondant à tout le document ?
#include <Word.au3>
Const $wdColorOrange = 26367
Const $wdToggle = 9999998
Local $oWord = _Word_Create()
Local $oDoc = _Word_DocAdd($oWord)
Local $oRange = _Word_DocRangeSet($oDoc, -1) ;Définit début/fin de la plage au début du document
For $i = 1 To 5
$oRange.InsertAfter("Text " & $i & @CRLF)
Next
$oRange = _Word_DocRangeSet($oDoc, -2) ;Définit début/fin de la plage à la fin du dcoument
_Word_DocPictureAdd($oDoc, 'C:\Program Files\AutoIt3\Examples\GUI\merlin.gif',Default,Default,$oRange)
$oWord.Selection.WholeStory ;sélectionne tout
$oWord.Selection.Range.Font.TextColor = $wdColorOrange
$oWord.Selection.Range.Font.Bold = $wdToggle
$oWord.Selection.Range.Font.Size = 14
;$oWord.ActiveDocument.Range(1,1).Select ;se place au 1 premier caractère
$pos = _Word_DocRangeSet($oDoc, -2)
$pos.Select ;ou se place à la fin du doc
$oWord.ActiveDocument.Saved = True ;;pour ne pas enregistrer le doc
Cordialement,
Walkson "Horas non numero nisi serenas " Le canon de midi
(Je ne compte que les heures heureuses)