質問: dateadd("m", 3, date) & " 8:30" '予定日と開始時間 objitem.save '保存 objitem.close 2 '閉じる excel2007とoutlook2007を使用しています。 1.多重起動しないことと 2.起動中で最小化されたoutlookがあるならアクティブ化して予定を入れる、または 3.起動していなかったら起動させて、予定を入れる と云うことがやりたいのですが・・・
回答: outlook は基本的に多重起動はしません。 set oapp = createobject("outlook.application") '既に起動してても新規起動 とありますが、本来であれば上記の記述はすでに起動している場合はその outlook を使用するという動作になります。 そうならないのだとすると、何らかの理由で outlook が正常に終了できておらず、起動中の outlook が使用できないので、新たに outlook が起動されてしまうのだと考えられます。 たいていはアドインが問題ですので、アドインをアンインストールして試してみてください。