如何使用宏自動格式化Word中的文本？

假設我有一個單詞文檔，其中包含Heading1，Heading2等一些文本樣式。現在我對每個文本都有特定的格式樣式，我想使用宏來應用這些樣式。而且我想檢查使用宏是否使用了正確的樣式。有沒有辦法我可以做到這些？如何使用宏自動格式化Word中的文本？

來源

2017-07-01 Raj

是的，有辦法用VBA宏來做到這一點。但是SO不是在這裏提供解決方案來幫助你。也許考慮閱讀此：https://stackoverflow.com/help/how-to-ask –

我明白這一點。我也不想要一個解決方案，但也許如果像你這樣的人可以指出我正確的方向。 – Raj

喲使用什麼版本的Microsoft Word？你知道你可以「記錄」宏嗎？這將是一個開始。如果發生特定問題，請隨時更新您的問題。另外我想知道你爲什麼要應用特定的格式？我想了解你的用例。 –

好吧，從我的理解你的問題，你想自動替換樣式。

這裏是一個宏觀的，它可以幫助你這樣做：

Public Sub SearchReplaceStyles() 

Dim search_style As String ' the style which apparently seem out of style 
Dim replace_style As String ' the desired style 

search_style = "Heading 1" 
replace_style = "Heading 2" 

With Selection.Find 
    .ClearFormatting 
    .Style = ActiveDocument.Styles(search_style) 
    .Replacement.ClearFormatting 
    .Replacement.Style = ActiveDocument.Styles(replace_style) 
    .Wrap = wdFindContinue 
    .Execute Replace:=wdReplaceAll 
End With 

End Sub

來源

2017-07-17 09:30:44

非常感謝！這真的很有幫助。 – Raj

不客氣。讓我知道你是否想檢查格式。但是我確定如果你是VBA開發人員，你會發現它非常快。 –

如何使用宏自動格式化Word中的文本？

回答

相關問題