cs_Jack
Messages postés14006Date d'inscriptionsamedi 29 décembre 2001StatutModérateurDernière intervention28 août 201579 19 sept. 2004 à 19:47
Salut bilaloch
Ton texte est dans quoi, quel controle ?
Pour avoir la taille en twips d'un texte :
Largeur = Me.TextWidth("Mon texte")
Hauteur = Me.TextHeight("Mon texte")
"Me" correspond à la forme dans laquelle se trouve le code.
Les valeurs seront renvoyées en rapport avec la fonte et la taille du texte de la Forme. Ces paramètres peuvent donc être différents pour le controle dans lequel le texte se trouve.
Comme, en général, on ne se sert pas de la forme pour écrire, tu peux initialiser les paramètres de la forme avec ceux du controle qui contient ton texte :
Me.Font = MonControle.Font
Pour convertir les twips en pixel :
Horizontalement : Pixels = Twips / Screen.TwipsPerPixelX
Verticalement : Pixels = Twips / Screen.TwipsPerPixelY
Là aussi, cette valeur peut changer selon que tu calcule tes données pour l'afficher à l'écran ou vers une imprimante : Tu peux remplacer Screen par Printer.