Jacie escribió que había creado una macro que configuraba el texto en Time New Roman. Quería cambiar la macro para alternar entre Times New Roman y Arial Narrow Bold, y se preguntó cómo hacerlo.

La forma más fácil de hacerlo en una macro es simplemente verificar la fuente utilizada en el texto seleccionado y luego seguir los pasos según lo que encuentre. Por ejemplo, la siguiente macro solo tomará acción si el texto seleccionado es Times New Roman o Arial Narrow:

Sub ChangeSelectedFont()

Select Case Selection.Font.Name         Case "Times New Roman"

Selection.Font.Name = "Arial Narrow"

Selection.Font.Bold = True         Case "Arial Narrow"

Selection.Font.Name = "Times New Roman"

Selection.Font.Bold = False     End Select End Sub

Sin embargo, existe una forma diferente, no macro, que puede tener algún sentido.

¿Por qué no usar estilos? Puede definir estilos para abarcar cualquier atributo de formato deseado. Por ejemplo, puede definir un estilo que utilice Times New Roman y otro que utilice Arial Narrow Bold. Puede aplicar los estilos a voluntad, desde la barra de herramientas, e incluso puede buscar y reemplazar usando los estilos.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios WordTips), he preparado una página especial que incluye información útil.

link: / wordribbon-WordTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

WordTips es su fuente de formación rentable en Microsoft Word.

(Microsoft Word es el software de procesamiento de texto más popular del mundo). Este consejo (1300) se aplica a Microsoft Word 97, 2000, 2002 y 2003. Puede encontrar una versión de este consejo para la interfaz de cinta de Word (Word 2007 y más tarde) aquí:

link: / wordribbon-Toggling_Font_Assignments_in_a_Macro [Alternar asignaciones de fuentes en una macro].