いつも拝見させていただいてます。 2つのエージェントを連続で実行させたいと思ってます。 過去レスをみて、以下の処理を入れてみましたが、 実行されませんでした。ヘルプをみると 「エージェントは再帰的には実行できません (エージェント自身から呼び出すことはできません)。」 とありましたので、だめもとでエージェントからボタンに変えてみたのですが、同じく実行はされませんでした。 ボタンにしたなら式でToolsrunmacroやrunagentなどを使ったり シンプルアクションなどでもよいのですが、 実は、ユーザに日付をインプットしてもらうので できたら、エージェントの中に次のエージェントの呼び出しを いれこめないかな?と思っているのです。 でもヘルプではエージェントで呼び出せないといっているので 他にできないかと試行錯誤しているところで、良案ございましたら ご教授いただけないでしょうか? ↓これでは実行されませんでした。 Dim ss as new Notessession Dim DB as Notesdatabase Dim agent As NotesAgent set DB = ss.Currentdatabase Set agent = DB.GetAgent("エージェント名") Call agent.Run ちなみに以下をつけてデバックしてみたところ、 「実行しました」となりますが実行してませんでした。 If agent.Run = 0 Then Msgbox "実行しました" Else Msgbox "実行しませんでした" End If よろしくおねがいします。