はやてさん、回答ありがとうございます。 はやてさんの回答がヒントになり解決しました。 編集モードに切り替えずにバックグラウンド(というのですか？)で 処理していたのですが、編集モードに切り替えて値を入れる処理に したらうまく動作しました。 uidoc.EditMode = True Set itemR = doc.ReplaceItemValue( "Field_B", doc.Field_A ) itemR.IsReaders = True Call doc.Save(True, False) 初心者的な間違えだったかもしれません・・・お恥ずかしいです。 皆さん、アドバイスをありがとうございました。。