Método Font.Shrink (Word)
Reduce el tamaño de la fuente al siguiente tamaño disponible.
Sintaxis
expresión. Shrink
Expresión Variable que representa un objeto Font .
Comentarios
Si la selección o el intervalo contiene varios tamaños de fuente, cada uno de ellos se reduce al siguiente valor disponible.
Ejemplo:
Este ejemplo inserta en un nuevo documento una línea de letras Z cuyo tamaño va reduciéndose.
Set myRange = Documents.Add.Content
myRange.Font.Size = 45
For Count = 1 To 5
myRange.InsertAfter "Z"
For Count2 = 1 to 3
myRange.Characters(Count).Font.Shrink
Next Count2
Next Count
Consulte también
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.
Comentarios
https://aka.ms/ContentUserFeedback.
Próximamente: A lo largo de 2024 iremos eliminando gradualmente GitHub Issues como mecanismo de comentarios sobre el contenido y lo sustituiremos por un nuevo sistema de comentarios. Para más información, vea:Enviar y ver comentarios de