Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Convierte una medida de líneas a puntos (1 línea = 12 puntos). Devuelve la medida convertida como Single.
Sintaxis
expresión. LinesToPoints (Value)
expresión Variable que representa un objeto Application.
Parámetros
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Valor | Obligatorio | Single | Valor de línea que va a convertirse a puntos. |
Valor devuelto
Simple
Observaciones
Este método supone una medida en líneas de 12 puntos; El tamaño real de cualquier texto de la publicación no tiene ningún efecto en el factor de conversión.
Utilice el método PointsToLines para convertir a líneas las medidas en puntos.
Ejemplo
En este ejemplo se convierten a puntos las medidas en líneas y se demuestra que el tamaño de fuente de la selección actual no influye en el factor de conversión. Para que este ejemplo funcione debe seleccionarse texto en la publicación activa.
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"
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.