ms-word - MS Word でのスタイルの高速検索と置換

Question

HTMLファイルからMS Wordファイルへの変換を自動化する必要があり、その一環として、スタイルのすべてのオコランスを削除しNormal (Web)、Normal.

私は以下を使用しています

$find = $word.Selection.Find
$find.Style = $word.ActiveDocument.Styles.Item("Normal (Web)")
$find.Forward = $True
$find.Format = $True
while ($word.Selection.Find.Execute())
{
    $word.Selection.Style = $word.ActiveDocument.Styles.Item("Normal")
    $null = $word.Selection.EndKey(5)
}

これは機能しますが遅いです。もっと速い方法はありますか？

Answer 1

置き換えないアプローチを見つけましたが、望ましい効果があります:

$style = $word.ActiveDocument.Styles.Item("Normal (Web)")
$style.Delete()