Méthode Application.LinesToPoints (Publisher)

Article
04/07/2023

Convertit une mesure de lignes en points (1 ligne = 12 points). Renvoie la mesure convertie sous la forme d’un type de données Single.

Syntaxe

expression. LinesToPoints (Value)

expressionUne variable qui représente un objetApplication.

Paramètres

Nom	Requis/Facultatif	Type de données	Description
Valeur	Obligatoire	Single	Valeur en lignes à convertir en points.

Valeur renvoyée

Unique

Remarques

Cette méthode suppose une mesure en lignes de 12 points ; la taille réelle d’un texte dans la composition n’a aucun effet sur le facteur de conversion.

Utilisez la méthode PointsToLines pour convertir en lignes des mesures en points.

Exemple

Cet exemple convertit en points des mesures en lignes en démontrant que la taille des caractères de la sélection active n'a pas d'impact sur le facteur de conversion. Un texte doit être sélectionné dans la composition active pour que cet exemple fonctionne.

Dim strOutput As String 
 
' Set text size to 10 points. 
Selection.TextRange.Font.Size = 10 
 
' Display result for one line of text. 
strOutput = "1 line = " _ 
 & Format(Application _ 
 .LinesToPoints(Value:=1), _ 
 "0.00") & " points"

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.