Excel 2007 o Excel 2010
Mostrar más instrucciones
1
Pulse la tecla " F11 ", "Alt " y en el programa que desea cambiar las fuentes pulg Por ejemplo, Microsoft Word, Excel o PowerPoint. Esto abre el Editor de Visual Basic (VBE ) .
2 Haga clic en "Insertar " en la barra de herramientas y después haga clic en " módulos".
3
Cut y pegue el siguiente código en la ventana en blanco :
Sub ChangeFontTo ()
'
' ChangeFontTo Macro
'
Selection.Font
. Name = " Times New Roman"
. size = 11
. Tachado = False
. Superíndice = False
. Subíndice = False
. OutlineFont = False
. Shadow = False
. Subrayado = xlUnderlineStyleNone
. themeColor = xlThemeColorLight1
. TintAndShade = 0
. ThemeFont = xlThemeFontNone
extremo con
End Sub
4
Cambiar el nombre de la fuente a cualquier fuente que usted desea. Por ejemplo, " . Name =" Comic Sans " " en lugar de " . Name =" Times New Roman " . "