keijun5145回答ポイントなし

ExcelのVBAで起動したOutlookのウィンドウを最大化する方法は？

仕事でExcelのVBAを活用して効率化をしようとしています。
その中でメールを送信するためにOutlookを使用する作業があります。
１．Outlookが起動しているか確認
２．Outlookが起動していなければ起動（起動していればなにもしない）
３．Outlookのウィンドウの状態を取得して最大化していなければ最大化
４．メールを作成（NamespaceやMAPIの処理は割愛）
５．メールを送信
という流れを考えています。１・２・４・５はできたのですが、３が実現できずにいます。
どのようなコードを記述すれば良いかご教示ください。
※ExcelのVBAで参照設定の項目にOutlook Object Libraryを追加済みです。

ログインして回答する

みんなの回答

pinkymonk2018/02/17 15:33:29

http://www.ken3.org/cgi-bin/group/vba_outlook.asp

にかいてある

'通常サイズ olNormalWindow=2 で表示(ほかに olMaximized=0,olMinimized=1)
oApp.ActiveWindow.WindowState = 0
とすればよいのでは？

試してません。ごめんね。

スター
- 1件のコメントを見る
- keijun5145 2018/02/17 20:38:57
  
  これでできなかったので質問しています。
  on error resume next を使用して
  for文で-100000～100000を試してみましたが通常サイズで起動されるだけでした。
  
  スター