Доступ к функции макроса для всех документов

Question

Я создал функцию макроса как:

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  

который я хочу использовать для каждого нового документа всякий раз, когда я хочу его использовать. Также я не хочу выполнять / запускать код макроса снова и снова каждый раз, когда мне нужен этот макрос.

Как получить доступ к этой функции макроса, не выполняя каждый раз, когда мне это нужно?

Answer 1

Ваш вопрос не совсем понятен, что вы подразумеваете под « Как получить доступ к этой функции макроса, не выполняя ее каждый раз, когда мне это нужно », но я думаю, что понимаю, о чем вы спрашиваете.

Поместите свой код в раздел модуля Normal на левой панели VBA Explorer.

Это сделает его доступным для всех документов Word, когда они открыты.

Когда вам это нужно, нажмите Alt + F8, чтобы открыть окно макроса. Выберите макрос и нажмите « Выполнить».