Positionner un texte à partir d'une ligne

**lodan** · 07/08/2017, 14h50

Bonjour,

Dans mon document j'ai un entête et un pied de page unique pour l'ensemble des pages.
J'ai une page qui contient 2 textes.
Disons :
- texte 1
- texte 2
Le texte 1 est positionné normalement en début de page et est la suite de la page précédente.
Le texte 2, je voudrai qu'il commence systématiquement à la même position de ligne sur une page.
Si la dernière ligne du texte 1, atteint la 1ère ligne du texte 2, alors le texte 2 passe sur la page suivante.
Évidemment je connais les notes de fin de page, mais cela ne me convient pas car le texte 1 et le texte 2 n'ont pas de rapport entre eux.
Espérant avoir été assez clair, je n'en attends pas moins un éclaircissement sur la possibilité de positionner un texte dans une page à partir d'un.
Merci d'avance.

Invité · 12/08/2017, 14h43

Envoyé par lodan

Bonjour,

Bien que votre message ne soit pas dans Macros-VBA Word, une piste consisterait à utiliser une macro pour faire cela.

Imaginons que le signet « Texte2 » contienne la chaîne "Texte 2" évoquée dans votre message. Je peux connaître sa position relative en nombre de points par rapport à la page en sélectionnant le signet et en récupérant la valeur de :

Code :

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

Selection.Information(wdVerticalPositionRelativeToPage)

La position verticale absolue en points représentant le milieu de ma page a pour valeur 299,25 + 70,5 de marge (sur lesquels je n’ai pas la main).

Par rapport aux 299,25 points, mon ~~onglet~~ signet ne peut être que :

• soit en dessous : dans ce cas j’insère autant de paragraphes que nécessaire avant. Pour en connaître le nombre, j’insère un paragraphe au dessus et je mesure la nouvelle position relative du signet.
• Soit égale : Dans ce cas, rien à faire, mais ce cas semble assez improbable statistiquement.
• Soit au dessus : dans ce cas, j’insère une rupture de page et j’insère autant de paragraphes que nécessaire jusqu’à la valeur la plus proche de 299,25.

Pour information : Le code réalisé semble fonctionner correctement.

Correction: Vous aurez sans fait tout seul la correction: Il faut lire Signet au lieu d'onglet.