Я создал функцию макроса как:
Sub updateFontCC()
Dim doc As Document
Set doc = ActiveDocument
Dim i As Integer
For i = 1 To doc.Range.Characters.Count
If IsNumeric(doc.Range.Characters(i)) Then
doc.Range.Characters(i).Font.Name = "Cambria"
Else
doc.Range.Characters(i).Font.Name = "Candara"
End If
Next i
End Sub
который я хочу использовать для каждого нового документа всякий раз, когда я хочу его использовать. Также я не хочу выполнять / запускать код макроса снова и снова каждый раз, когда мне нужен этот макрос.
Как получить доступ к этой функции макроса, не выполняя ее каждый раз, когда мне это нужно?
источник