0

VBA を介して OLE オブジェクトとして単語文書をゼロから作成しており、その中に相互参照を作成しています。私は実際に LotusScript を使用していますが、VBA の原則が当てはまるはずです。

相互参照を作成したら、それを含むテーブル セル全体を書式設定します (Arial 8 Italic) が、ドキュメントを保存すると、フィールドの書式が更新されます。Word フロントエンドで [更新時に書式を保持する] オプションをオンにすることでフィールドのプロパティを手動で設定できることは知っていますが、そのための VBA プロパティはありますか?

NB、相互参照は見出しに対するものであり、取得している書式設定はその見出しと同じように見えますが、これは私が望んでいるものではありません。

どうもありがとう、フィル

4

1 に答える 1

0

私は解決策を見つけました:-)

これは LotusScript ですが、VB ユーザーならその意味を理解できるはずです。また、関数と 3 つのサブルーチンを呼び出しますが、これらはすべて一目瞭然です。 rgは、クロスリファレンスを作成したばかりの Range です。アプリケーションの性質上、フィールドが範囲内の最初のものであることはわかっています。最後の行は重要です。

Set rg = getTableCell(subTable, 2, 1).Range
Dim fld As Variant
Set fld = rg.Fields(1)

Call SetItalicsOnOff(rg, True)
Call SetFontFace(rg, "Arial")
Call SetFontSize(rg, 8)
fld.Code.Text = fld.Code.Text & " \* MERGEFORMAT"
于 2013-08-06T08:24:58.717 に答える