XL 2013 unité de mesure des positions d'un inputbox

patricktoulon

XLDnaute Barbatruc
Bonjour à tous
je me pose une question qui est peut être bête mais j'm'en fiche je la pose quand même ;)

dans mon Userform je lance un inputbox placé au niveau du Userform

pour qu'il soit placé là ou je veux je suis obligé de multiplier par 20 la position left et top du userform

question :
  1. est ce normal?
  2. si oui quelle est l'unité de mesure (point , pixel , cm , etc...)?
VB:
Private Sub Label3_Click() 'bouton header
x = InputBox("veuillez entrer le texte du header", "texte du header", "tapez votre texte ici", Me.Left * 20, Me.Top * 20)
End Sub
merci pour les éventuels retours
 

patricktoulon

XLDnaute Barbatruc
re
coucou robert ;)
VB:
Sub test()
Large = 94

hauteur = 53

diagonale = 107

lpoint = Application.CentimetersToPoints(Large)

lpix = Application.CentimetersToPoints(Large) * (4 / 3)

ltw = (Application.CentimetersToPoints(Large) * ((4 / 3))) * 20
Debug.Print "largeur "
Debug.Print "en dpi 96"
Debug.Print "largeur en points  " & lpoint
Debug.Print "largeur en pixel (dpi 96 soit 100%)  " & lpix
Debug.Print "largeur en twips dpi(96 soit 100% )  " & ltw
Debug.Print vbCrLf & "en dpi 120 soit 125%"
Debug.Print "largeur en points  " & lpoint * 1.25
Debug.Print "largeur en pixel (dpi 120 soit 125%)  " & lpix * 1.25
Debug.Print "largeur en twips dpi(120 soit 125% )  " & ltw * 1.25

Debug.Print vbCrLf & "hauteur"

lpoint = Application.CentimetersToPoints(hauteur)

lpix = Application.CentimetersToPoints(hauteur) * (4 / 3)

ltw = (Application.CentimetersToPoints(hauteur) * ((4 / 3))) * 20
Debug.Print "en dpi 96"
Debug.Print "largeur en points  " & lpoint
Debug.Print "largeur en pixel (dpi 96 soit 100%)  " & lpix
Debug.Print "largeur en twips dpi(96 soit 100% )  " & ltw
Debug.Print vbCrLf & "en dpi 120 soit 125%"
Debug.Print "largeur en points  " & lpoint * 1.25
Debug.Print "largeur en pixel (dpi 120 soit 125%)  " & lpix * 1.25
Debug.Print "largeur en twips dpi(120 soit 125% )  " & ltw * 1.25

End Sub
 
Dernière édition:

dysorthographie

XLDnaute Accro
Non, ça n'a toujours aucun sens : voir conversations précédentes sur le sujet. ;)

Déjà, "dpi 96" ne veut rien dire, mais en plus (comme déjà expliqué plusieurs fois) le zoom à 100 % ne donne pas forcément 96 dans la vraie vie, ça dépend de l'écran. 😉
D'où toutes ces mesures Microsoftiennes théoriques fausses IRL... 😁
Bien sur que si ça veux dire qq chose!

moi avec mon 13" j'ai pas 96 dpi mais 28,3464566929134 !

sit ut connais le nombre par Cm alors tu en déduit le reste!
 

TooFatBoy

XLDnaute Barbatruc
moi avec mon 13" j'ai pas 96 dpi mais 28,3464566929134 !
Et je suppose que le zoom de ton Bureau est à 100 %.
Si c'est bien le cas, tu confirmes là ce que je disais : 100 % ne donne pas forcément 96. 👍
(28 ça me paraît très faible... t'es sûr d'avoir bien calculé ?)

Moi non plus je n'ai pas 96 dpi : j'avais mesuré 111 dpi pour la dalle de mon moniteur (si je me souviens bien) et le Bureau de mon Windows a un zoom à 100 %.


Je me repencherai sur les twips à tête reposée...
Ce serait sympa que j'arrive enfin à comprendre, au bout de 25 ans, ce que Microsoft nous raconte avec ses twips. 😁


@+
🖖
 
Dernière édition:

TooFatBoy

XLDnaute Barbatruc
Le code de #21 donne des valeurs fausses. :(

Déjà, je pense qu'il y a une erreur dans le code : ce n'est pas Lpix, mais Lpoint, qu'il faut multiplier par 20.

Capture_107-cm_2022-11-14_17-45-16.png
Capture_35-cm_2022-11-14_17-49-51.png
Ensuite, on voit bien que ça donne n'importe quoi, puisqu'il suffit de modifier la taille de l'écran pour que ça modifie le nombre de pixels (comme si on vivait encore à l'époque où tous les moniteurs avaient la même résolution... 🤪😅).
 

Discussions similaires

Statistiques des forums

Discussions
312 275
Messages
2 086 707
Membres
103 377
dernier inscrit
fredy45