Manipulation Word sous .Net

Manipulation Word sous .Net - VB/VBA/VBS - Programmation

Marsh Posté le 21-06-2006 à 11:22:08    

Bonjour à tous !
 
Je me casse la tête depuis quelques jours pour effectuer une manipulation de word à partir de .Net !
Je m'expique je cherche une balise du genre ##BREAK## que je veux effacer et faire une saut de page !
Alros j'arrive à remplacer grâce à :
 
oWordAppl.Selection.Find.Text = "##BREAK##"
oWordAppl.Selection.Find.Replacement.Text = ""
oWordAppl.Selection.Find.Execute(Replace:=Word.WdReplace.wdReplaceAll)
 
par cotnre je n'arrive pas à y mettre mon saut de page au même endroit si je met :
oWordAppl.Selection.InsertBreak(Type:=WdBreakType.wdSectionBreakNextPage)
 
je fait bien un saut de page mais au debut de mon document pas à l'endroit de mon mot clef !
est-ce que quelqu'un a une idée de comment je peux faire ?
 
Merci par avance

Reply

Marsh Posté le 21-06-2006 à 11:22:08   

Reply

Marsh Posté le 21-06-2006 à 15:56:30    

J'ai finalement trouvé la solution je la donne pour ceux que ça interesserait, alors il ne fallait pas faire un replaceAll mais un ReplaceOne et bucler comme ceci :  
 
Dim MyBool As Boolean = True
 
            Do While MyBool
                oWordAppl.Selection.Find.Text = strFind
                oWordAppl.Selection.Find.Replacement.Text = strReplace
                MyBool = oWordAppl.Selection.Find.Execute(Replace:=Word.WdReplace.wdReplaceOne)
                If MyBool Then
                    oWordAppl.Selection.InsertBreak(Type:=WdBreakType.wdSectionBreakNextPage)
                    oWordAppl.Selection.PageSetup.Orientation = WdOrientation.wdOrientLandscape
                End If
            Loop

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed