2017-05-27 5 views

答えて

0

あなたはまっすぐな方法を試しましたか?

Dim MyStyle As Style 

Set MyStyle = MyDocument.Styles("MyStyle") 
YourDocument.Paragraphs(1).Style = MyStyle 
+0

はい、私はそれを使用しましたが、段落の選択に適用する方法はわかりません。私はSelection.Style = ActiveDocument.Styles(myStyle)で試したところ、myStyleは異なるスタイルの辞書であるスタイルです。 – nunu1124

+0

'Selection.Range.Style = myStyle'は、現在選択されているすべてのスタイルにスタイルを適用します。 – Variatus

+0

私の裁判では、上記は期待通りに機能しませんでした。新しいスタイルは、既存のものを上書きしました。既存のものと新しいものの両方を持つには、 'YourDocument.Styles.Add" MyStyle "、wdStyleType'でスタイルを追加し、既存のMyStyleを新しい" MyStyle "スタイルに割り当てる必要があります。コードを必要としない代替手段として、「文書スタイルを自動的に更新する」を調べることができます。 。 – Variatus

0

それはあなたがそれを適用したい文書で同じ設定を存在している場合にのみ、別のドキュメントからのスタイルを適用することができます。

スタイルをドキュメントAからドキュメントBにコピーするには、オーガナイザを使用する必要があります。 This articleは、インターフェイスを介して行う方法を示します。コードを使用してそれを行う必要がある場合は、see here for details

関連する問題