Discussion :

[xavllo58]

Bonjour à tous,

Pour gérer les tabulations avec des macros, j'ai compris qu'il fallait utiliser les propriétés TabStop. Ainsi, pour affecter une tabulation à un paragraphe, on peut utiliser :

Code :

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

1
2
3
4
5
Dim tabs as new com.sun.star.style.TabStop
        tabs.position = 12000 ' 12 cm de la marge gauche
        tabs.alignment = 2 ' aligement droite
        tabs.FillChar = Asc(".") ' caractère de remplissage
        oCursor.ParaTabStops = Array(tabs)

Je voudrais faire l'inverse, c'est à dire, connaître les informations de la tabulation d'un paragraphe. J'ai essayé

Code :

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

msgbox oCursor.ParaTabStops.position

mais rien... Je dois sans doute mal utiliser les propriétés. Je voudrais un message qui me dit si une tabulation est définie dans le paragraphe du curseur et si oui, avoir ses propriétés.

En passant, comment peut-on avoir les informations si plusieurs tabulations sont placées ?

D'avance merci

Xav

PS: j'avais trouvé une macro qui listait toutes les infos d'une variable tableau mais impossible de remettre la souris dessus et je ne retrouve pas le mots clés utilisés ni le chemin "méandreux" qui m'y avait conduit...

[xavllo58]

Bonjour,

C'est bien ce que je pensais, je m'y prenais mal avec la variable tableau. Pour trouver la réponse, j'ai tout simplement mis ma variable Tabs en témoin et j'ai regardé ce qu'elle faisait. Du coup, voici le code pour afficher les infos d'une tabulation :

Code :

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

1
2
3
4
5
6
7
Tabs = oStilePar.ParaTabStops
 
Min =lbound(Tabs())
Max=ubound(Tabs())
for x=min to Max
    msgbox "Position : " & Tabs(x).position & chr(10) & "Alignement : " & Tabs(x).Alignment & chr(10) & "Caractère de remplissage : " & Tabs(x).FillChar
next x

Cela permet de lister les tabulations placées sur le paragraphe et d'obtenir les informations voulues...

Par contre, j'observe des valeurs bizarres : par exemple pour la tabulation placées à 5 cm, il renvoie 5001 au lieu de 5000. Pareil pour certaine valeur de retrait.

De même, quand il n'y a pas de tabulation, au lieu de renvoyer 0 pour la position, il propose 1134...

Avez-vous une idée ?

Xav