エクセル２０００マクロ操作

下記のマクロを記述していますが
Dim msg
msg = MsgBox("データ入力は正しいですか。?", 1, "データ入力確認")
メッセージボックスの表示位置を真ん中でなくて、決めた位置に表示を変えることは
できるのでしょうか？操作方法があれば教えてください。
出来たらマクロ操作でお願いします。

No.4 回答者： TAGOSAKU7 回答日時： 2001/11/03 14:01

WindowsAPIを使用するとできます。

１．SetWindowsHookEx という関数を使用しメッセージボックスをフックする用意２．MSGBOXを呼ぶ
をする。

以下フック関数内での処理
３.GetDesktopWindowでデスクトップのハンドルを得る
４．GetWindowRectでデスクトップの領域座標（解像度）を得て、中心座標を得る。
５．フックした関数の中で、ダイアログの表示位置を設定する。

といった処理が必要になります。
必要であればサンプルを記述しますが、API関数を使用したことがなければ、ちょっと理解しづらいかも知れません。
オリジナルのフォームを作成したほうが楽かも？

No.3 回答者： kougasha 回答日時： 2001/11/02 23:47

メッセージボックスではなく、同じような

見かけのユーザーフォームを作成したらい
かがですか？
LoadしてShowする前に、Moveしてやれば
お望みの位置に表示できますよね。
もちろん、メッセージボックスとしての機
能を実現するために、多少フォーム内の処
理は記述しなくてはなりませんけどね。

No.2 回答者： maruru01 回答日時： 2001/11/02 18:33

こんにちは。

maruru01です。
多分出来ません。私は思いつきません。少なくともVBでは出来ません。
そこで、フリーウェアのOCXなどを使用する方法があります。
下記に1例としてURLを載せておきます。
ただし、私は試してないので、VBAで使えるかどうかはわかりません。
下記以外にもベクターなどで検索して探してみて下さい。
では。

参考URL：http://www.vector.co.jp/soft/win95/prog/se195104 …

No.1 回答者： nishi6 回答日時： 2001/11/02 18:32

Excel95、97、2000と使っていますが、できないと思っています。

新しいバージョンや何か技があるかもしれませんが。

どうしても必要なときは、ユーザーフォームを使って、メッセージボックスと同じようなダイアログを作ったこともありますが、今は無頓着になってきました。真ん中にボンと出しています。

ご参考に。（ならない？）