Méthode Application.PointsToLines (Publisher)
Convertit une mesure de points en lignes (1 ligne = 12 points). Renvoie la mesure convertie sous la forme d’un type de données Single.
Syntaxe
expression. PointsToLines (Valeur)
expressionUne variable qui représente un objetApplication.
Paramètres
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
Valeur | Obligatoire | Single | Valeur en points à convertir en lignes. |
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 LinesToPoints pour convertir en points des mesures en lignes.
Exemple
Cet exemple montre comment convertir des mesures en points en mesures de lignes, ce qui montre que la taille de police de la sélection actuelle n’a aucune incidence 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 12 points.
strOutput = "12 points = " _
& Format(Application _
.PointsToLines(Value:=12), _
"0.00") & " lines"
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.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour