誰か教えてください。

OS:Windows 7 Professional SP1(Windows Update済)
Office:2010 Professional バージョン 14.0.6129.5000

ExcelのVBAにこんなコードを記述しました。
Private Sub Workbook_Open()
    Application.WindowState = xlMinimized  ' 最小化
    AppActivate "Microsoft Excel"   ' Excelをアクティブに
End Sub


Excelでフォームを表示する時に意外と使われているっぽいコードです。

で、上記OS、Office環境でこのコードを記述し実行すると、
エラーが表示されます。

「実行時エラー '5' プロシージャの呼び出し、または引数が不正です。」

まぁ、定番のエラーです。

しかし、OSがXPだったり、Officeが2003だったりするとエラーが出ません。
上記組合わせの場合に出ます。
Excelが起動している場合はエラーが出ません。

拡張子「.xlsm」「.xls」の両方で確認しましたが、エラーが発生します。


エラーが出ない事を確認した組み合わせ(2007は無い…)
・Windows XP × 2010
・Windows XP × 2003
・Windows 7 × 2003


誰かエラーが出ない方法を教えてください。
もうむりぽ


ちなみに、"Microsoft Excel"の部分を定番のものに変更しても無駄だったので、追記しておきます。



追記:2012年12月17日 17:00
Office2010 で新規に作ったExcelでは、上記組み合わせでエラーが出るが、
Office2003 で新規に作ったExcelでは、どの組み合わせでもエラーが出なかった。
なぜだっ!?

コメント

このブログの人気の投稿

ヨドバシカメラの店舗購入履歴を見るには…

C# の WPF の DataGrid で 行を交互に背景色を変える+選択色を変える+カラムが無い所も変える…

Visual Studio の ホットリロードが動かない場合に確認するところ