質問: sr.nextstoryrange '' fixme: for footnotes, endnotes and comments, i get a pop-up '' "word cannot undo this action. do you want to continue?" sr.fields.update wend next sr end sub '' update all the fields, indexes, etc. in the active document. '' this is a parameterless subroutine so that it can be used interactively. sub updateallfields() updateallfieldsin activedocument end sub
回答: この ページ は面白そうです: word 2007を使用している場合、手順は少し異なります。[office]ボタンをクリックし、[wordのオプション]をクリックします。 wordの[wordのオプション]ダイアログボックスが表示されます。ダイアログボックスの左側にある[詳細設定]をクリックします。 (関連図を参照するには、ここをクリックしてください。)[全般]領域(少し下にスクロールして表示)で、[開くときに自動リンクを更新]チェックボックスがオンになっていることを確認します。 okをクリックしてください。その設定はあなたのすべてのリンクが常に最新のものであることを確認するべきです。文書を開いたときにフィールドを更新したい場合は、タスクを実行するためにマクロを使用する必要があります。具体的には、文書を開くときと閉じるときのどちらでフィールドを更新するかに応じて、autoopenマクロまたはautocloseマクロを使用する必要があります。以下は、使用できるautoopenマクロの例です。 sub autoopen() with options .updatefieldsatprint = true .updatelinksatprint = true end with activedocument.fields.update end sub このマクロは、印刷時にフィールドとリンクを強制的に更新するようにオプションが設定されていることを確認してから、文書内のfieldsコレクションのすべてのメンバーを更新します。代わりに、終了時にフィールドを更新したい場合は、このマクロを使用できます。 sub autoclose() activedocument.fields.update end sub このマクロは、document.exitを終了するときにupdate-on-printオプションを設定する必要がないため、はるかに短くなります。