SAKUさん、ご回答いただき有難うございます。 AppendToTextListをスクリプトへ設定し実行してみましたが、期待通りには動作しませんでした。 値を追加する項目ですが、こちらは何か設定を行う必要が有りますか? 例えば、「複数値も可」などのような設定です。 スクリプトには下記のように記述しました。 Dim itemAP9 As NotesItem Set itemAP9 = docAP.GetFirstItem("APPHISR") Call itemAP9.AppendToTextList( nowhis$ ) ※nowhis$ には格納したい文字列が格納されています。 お手数ですが、何が問題なのか教えていただけないでしょうか?