XL 2013 Fonction pour déterminer la largeur en points ou pixels d'un texte

[Dudu2]

Bonjour,

Petit souci avec un Label dans un UserForm qui est en AutoSize = True mais qui ne s'ajuste qu'en hauteur.
Il semble qu'il s'ajuste en largeur sur les 6 ou 7 premiers caractères.

D'où la question: existe-t-il une fonction pour déterminer la largeur en points ou pixels d'un texte sans retour à la ligne, même approximative ?'

Sinon je vais essayer d'exploiter cette largeur par défaut en considérant simplement qu'elle contient 6 caractères représentatifs d'un texte quelconque et appliquer le ratio sur la longueur du texte.


Merci par avance pour toute suggestion.

 

[Dudu2]

Bonjour jmfmarques,
Maintenant que tu nous a mis l'eau à la bouche, on veut connaître ton frère jumeau et ce qu'il a déposé dans le domaine cité. Et s'il s'appelle ucfoutu, il a vraiment un drôle de nom 😎.

 

[jmfmarques]

Et s'il s'appelle ucfoutu, il a vraiment un drôle de nom

Je crains fort qu'il s'appelle en effet ainsi 😛
Et je suppose du coup que tu es déjà "tombé" sur ce dépôt.

Mais si tel n'est pas le cas, voilà le lien :

Visual Basic / VB.NET : Dimensions graphiques vba (équivalents de scalex, scaley, twipsperpixelx, twipsperpixely, textwidth et textheight de vb6) - CodeS SourceS

'Ce module contient des outils qui, présents sous VB6, sont absents sous VBA/Excel, à savoir : '1) Les méthodes ScaleX et ScaleY, qui permettent...

codes-sources.commentcamarche.net

me voilà inquiet, pour le coup. Car si mon jumeau a vieilli de 8 ans, j'ai alors vieilli d'autant moi-même. Snif

 

[Dudu2]

Je mets quand même le lien au cas où de lecteurs seraient aussi intéressés.

Visual Basic / VB.NET : Dimensions graphiques vba (équivalents de scalex, scaley, twipsperpixelx, twipsperpixely, textwidth et textheight de vb6) - CodeS SourceS

'Ce module contient des outils qui, présents sous VB6, sont absents sous VBA/Excel, à savoir : '1) Les méthodes ScaleX et ScaleY, qui permettent...

codes-sources.commentcamarche.net

 

[Magic_Doctor]

Bonsoir,

Je cherchais un moyen pour trouver une correspondance en pixels de la largeur d'un texte.
Je n'ai pas trouvé grand-chose. Même sur cet illustre forum je n'ai trouvé qu'un seul fil, celui-ci. Quoi qu'il en soit, je me doutais qu'il fallait passer par des APIs.
En désespoir de cause, je pose la question à ChatGPT qui m'a répondu en me communiquant les APIs et les UDF que je lui demandais.
Ma foi, ça a l'air de marcher.
Ça tient compte de la police et de sa taille.
Je pense qu'on peut simplifier, mais il faut passer par des APIs.
Qu'en pensez-vous ?

 

[Dudu2]

Bonjour @Magic_Doctor,
Merci pour ton retour.
C'est un vieux truc de mes débuts, avec ce fichier adapté, on a aussi un résultat...

 

[Magic_Doctor]

Bonjour Dudu2,

Ta question initiale était :
D'où la question: existe-t-il une fonction pour déterminer la largeur en points ou pixels d'un texte sans retour à la ligne, même approximative ?

J'avais commencé par chercher une solution pour les pixels. Une fois que je l'ai obtenue (mais je ne sais toujours pas si les résultats sont corrects), pour les pouces, je me suis dit qu'il fallait simplement convertir les pixels en points. Je cherche donc sur le net un facteur de conversion, et je tombe sur ceci :

Comment Convertir les Pixels en Points?​

Convertir les pixels en points dépend de la résolution et de la taille de l'écran ou du document avec lequel vous travaillez. Cependant, un facteur de conversion courant est que 1 point (pt) est égal à 1÷72 de pouce, et 1 pixel (px) est généralement équivalent à 1÷96 de pouce sur la plupart des écrans.

Ainsi, pour convertir les pixels en points, vous pouvez utiliser la formule suivante : (Pixels ÷ 96) × 72 = Points

Cette formule suppose une résolution d'écran standard de 96 pixels par pouce. Si vous travaillez avec une résolution différente, vous devrez ajuster en conséquence. Par exemple, si votre résolution d'écran est de 120 pixels par pouce, vous remplaceriez le 96 dans la formule par 120.

¡Caramba! Il faut alors connaître le DPI/PPI (144 chez moi, je ne savais même pas ce que c'était exactement) de son moniteur pour connaître la valeur juste en pouces.
ChatGPT m'apporte plusieurs solutions.

En pouces, pour un même texte : "Zorro est arrivé"
avec une même police (j'imagine "Calibri") d'une taille de 18.
Toi : 119,5 pts
Moi : 113 pts

Quant aux pixels (226 px chez moi), on ne peut hélas pas comparer.
En conséquence, je reste sur ma faim.
Enfin, ta solution n'est pas à proprement parler une fonction comme tu le demandais initialement.

 

[Dudu2]

Pour la conversion Point <-> Pixel j'utilise l'un de ces 2 fichiers selon que la fonction API GetDpiForWindow() est disponible ou pas.

 

[TooFatBoy]

Bonjour,

J'ai testé ton classeur hier et j'ai trouvé ça FA-BU-LEUX !!! Sur le test que j'ai fait ça semblait parfaitement fonctionner, pile poil le bon nombre de pixels.

Convertir les pixels en points dépend de la résolution et de la taille de l'écran ou du document avec lequel vous travaillez.

Je vous vaguement en quoi la résolution intervient si on considère qu'un point est 1/72 de pouce, mais je ne vois pas en quoi la taille de l'écran peut bien intervenir.

Cependant, un facteur de conversion courant est que 1 point (pt) est égal à 1÷72 de pouce, et 1 pixel (px) est généralement équivalent à 1÷96 de pouce sur la plupart des écrans.

Et on atteint la question que je me suis posée hier : est-ce que ça fonctionne également si on applique une zoom au niveau du Bureau ou d'Excel ?

Cette formule suppose une résolution d'écran standard de 96 pixels par pouce. Si vous travaillez avec une résolution différente, vous devrez ajuster en conséquence. Par exemple, si votre résolution d'écran est de 120 pixels par pouce, vous remplaceriez le 96 dans la formule par 120.

Et voilà qui répond encore une fois parfaitement à la question.👍


Autant il est facile de voir si le nombre de pixels est correct, autant je trouve compliqué de savoir si la conversion en points donne le bon résultat. 🤔 🤯 🤪

 

[Dranreb]

Bonjour.
Pour une TextBox avec WorkWrap=True, après .Autosize=False je mets une certaine valeur maxi au .Width pour éviter de reprendre celui défini par l'ancien texte.

 

[TooFatBoy]

Il faut alors connaître le DPI/PPI (144 chez moi, je ne savais même pas ce que c'était exactement) de son moniteur pour connaître la valeur juste en pouces.

Ben ça c'est hyper simple : il suffit de simplifier par "PI", ce qui fait qu'il ne reste plus que "D/P" et on voit tout de suite que c'est simplement le nombre de points par pixel. 😉

 

[Magic_Doctor]

Bonsoir tout le monde,

Comme on dit à Marseille "je me suis levé le maffre" avec ChatGPT pour compiler un florilège de fonctions qui devraient permettre de jongler joyeusement et en toute sérénité avec les pixels et les points.

PS : parfois on est lent.
TooFatBoy finit son post par : Ben ça c'est hyper simple : il suffit de simplifer par "PI", ce qui fait qu'il ne reste plus que "D/P" et voit tout de suite que c'est simplement le nombre de points par pixel. 😉
Quand j'ai lu ça rapidement la première fois, je me suis dit : pfff ça m'a l'air bien compliqué cette histoire.
Je relis maintenant, et j'ai rigolé tout seul en me disant : Bon Dieu mais, c'est bien sûr !... et qu'est-ce que je suis lent !

Au fait, comment on met les citation : "Machin a dit" ?

 

[TooFatBoy]

Au fait, comment on met les citation : "Machin a dit" ?

Tu sélectionnes/surlignes avec la souris le texte que tu veux citer et il y a un bouton "Répondre" qui apparaît. Tu n'as plus qu'à cliquer sur ledit bouton. 😉

 

[Magic_Doctor]

Tu sélectionnes/surlignes avec la souris le texte que tu veux citer et il y a un bouton "Répondre" qui apparaît. Tu n'as plus qu'à cliquer sur ledit bouton. 😉

Gracias TooFatBoy