Microsoft Word 2010 巨集問題

Question

這是我錄製的宏，但它不會運行。當我單擊名稱和“運行”時，什麼也沒有出現。我知道如何記錄和使用它們，但我無法讓記錄的巨集為 ff: Circle Red（如下）或我嘗試記錄的任何文字方塊運行。

       .Shadow = wdUndefined
        .Outline = wdUndefined
        .Emboss = wdUndefined
        .Engrave = wdUndefined
        .AllCaps = wdUndefined
        .Hidden = wdUndefined
        .Underline = wdUndefined
        .Color = wdColorRed
        .Size = wdUndefined
        .Animation = wdUndefined
        .DoubleStrikeThrough = wdUndefined
        .Name = ""
    End With
    .LinkedStyle = ""
End With
ListGalleries(wdNumberGallery).ListTemplates(1).Name = ""
Selection.Range.ListFormat.ApplyListTemplateWithLevel ListTemplate:= _
    ListGalleries(wdNumberGallery).ListTemplates(1), ContinuePreviousList:= _
    False, ApplyTo:=wdListApplyToWholeList, DefaultListBehavior:= _
    wdWord10ListBehavior
End Sub

Sub CircleRed()
'
' CircleRed Macro
'
'
End Sub

Answer 1

假設您擁有此程式碼，那麼很明顯您缺少一些重要的部分。

我的建議是刪除所有程式碼並重新錄製巨集。這樣做比學習如何寫 VBA 並修復它要快得多。