Bonjour Lucien, Le 01/05/2014 23:05, lutch a écrit : > > j'ai trouvé ceci sur un forum >> Sub AtteindreCadreSpecifique >> Dim oFrame As Object >> >> 'Spécifie le 1er cadre dans le document >> oFrame = ThisComponent.TextFrames.getByIndex(0) >> 'Positionne le curseur dans le cadre >> ThisComponent.CurrentController.Select( oFrame.Text.Start ) >> >> End Sub > > j'ai testé rapidement, ça entre bien dans le cadre.
effectivement, ça :-) et j'ai ajouté ceci Dim oInsPt As Object [ton code] 'Positionne le curseur à la fin du texte saisi dans le cadre oInsPt = ThisComponent.CurrentController.ViewCursor oInsPt.gotoEnd(False) Merci ! -- Jean-Francois Nifenecker, Bordeaux -- Envoyez un mail à [email protected] pour savoir comment vous désinscrire Les archives de la liste sont disponibles à http://listarchives.libreoffice.org/fr/users/ Tous les messages envoyés sur cette liste seront archivés publiquement et ne pourront pas être supprimés
