Premere il tasto " F11 " " Alt " e nel programma che si desidera modificare i font in Per esempio , Microsoft Word , Excel o PowerPoint . Si apre l'editor di Visual Basic (VBE ) .
2
Clicca su "Inserisci" sulla barra degli strumenti e quindi fare clic su " Modulo ".
3
Cut e incollare il seguente codice nella finestra vuota :
Sub ChangeFontTo ( ) per
'
' ChangeFontTo Macro
'
Selection.Font
. Name = " Times New Roman"
. Dimensione = 11
. Barrato = False
. Apice = False
. pedice = False
. OutlineFont = False
. Ombra = False
. Sottolineato = xlUnderlineStyleNone
. themeColor = xlThemeColorLight1
. TintAndShade = 0
. ThemeFont = xlThemeFontNone
End With End Sub
4
Cambiare il nome del font per qualsiasi tipo di carattere che desiderate. Ad esempio, " . Name =" Comic Sans " " invece di " . Name =" Times New Roman " ".
software © www.354353.com