Discussion :

[VincentRoy]

Bonjour à Tous,

Je charge un document word dans lequel je fais une boucle et sélectionne à chaque fois le texte.
Mon problème est que je veux récupérer une "position" du texte sélectionné.
Existe t il une fonction VBA pour récupérer la position X,Y du texte sélectionné ?.

Bonne journée
Merci

[ouskel'n'or]

Non, pas à ma connaissance. Par contre, tu peux insérer un signet qui te permettra de retrouver l'emplacement de ta sélection plus tard
Deux solutions :
- Ou tu places le signet avant la donnée
- ou tu le places sur la donnée, après selection
Dans les deux cas, tu mets ça

Code :

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

1
2
    ActiveDocument.Bookmarks.Add Range:=Selection.Range, _
    Name:="NomDuSignet"

Et pour retourner sur le signet

Code :

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

    Selection.GoTo What:=wdGoToBookmark, Name:="NomDuSignet"

A+

[VincentRoy]

Bonjour,

Merci pour votre réponse.
Malheureusement, elle ne va pas convenir à mon problème.
Ce que je veux est de pouvoir dire que tel ou tel texte sélectionné se trouve à tel endroit dans le document word.
Si les positions n'existent pas, est ce que la ligne/colonne existe ?
Ensuite je pense pouvoir me debrouiller avec pour calculer approximativement l endroit par rapport au nombre de lignes et colonnes totales du document.
Bon apres midi.

[Speedrman]

Salut,

Pour avoir la position de début et de fin de sélection, tu peux utiliser ça

Code :

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

1
2
3
posDebut = Selection.Range.Start
 
posFin = Selection.Range.End