Discussion :

[nicomeg]

Bonjour à tous,

La problématique est la suivante:

je souhaite réaliser un publipostage sur des étiquettes.
Mes champs, insérés dans des zones de texte, renvoient des informations dont je ne maitrise pas le nombre de digit (la référence ou la désignation d'articles...)
Je ne peux pas jouer sur la taille de ma cellule, et je dois pouvoir faire afficher toute ma chaine de caractères.

Es-ce que quelqu'un saurait m'indiquer comment adapter la taille de ma police en fonction de ma zone de texte?

D'avance, je vous remercie!!

Nico

[Sepia]

Salut nicomeg,

D'abord il faut que tu utilises des cellules de tableau sans l'option "Redimensionner automatiquement pour ajuster au contenu".

Après, tu peux faire du prédictif mais c'est simple (et pas forcément optimisé) mais ça marche. La plupart des polices (modernes) sont de type TrueType et sont donc de chasse variable(c'est-à-dire que la largeur des caractères n'est pas fixe). De ce cas, la largeur du plus grand caractère est bonne comme référence (pour la France, on prend le "M"). Donc ce que tu fais, tu mesures le nombre de "M" que tu peux mettre dans ton champ avec différentes polices ==> en taille "normale", mettons que tu puisses mettre 15 "M", et en police de taille "normale" - 1, tu puisses en mettre 17, en taille "normale" - 2, 20... Après lorsque tu veux "écrire" ton texte, tu calcules sa longueur et si elle est inférieure à 15, tu "écris" en police de taille "normale", si elle est inférieure à 17 (mais plus grand que 15), tu utilises la police taille "normale" - 1 et ainsi de suite...

Maintenant si tu as vraiment besoin d'optimiser la taille, il va falloir calculer la taille réelle (ce qui est très complexe en général et encore plus en Word car la fonction StringWidth() n'est pas optimisée car elle "ajoute" quelques twips pour être sure que ça tienne et avec les espaces en style justifié, c'est très compliqué). Une fois que tu as la taille "réelle", il va falloir vérifier que ça tienne, SI c'est le cas, c'est Ok, sinon il faut recommencer en diminuant la taille de 1 point jusqu'à ce que ça tienne. La macro est n'est pas simple mais c'est possible.

@+