Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

MsgBoxの表示位置を変更するExcelマクロを教えて下さい。

2,747 views
Skip to first unread message

K.kakiuchi

unread,
Sep 7, 2009, 3:39:01 AM9/7/09
to
ExcelマクロのMsgBoxの表示は、画面の中央の出ますが、
表示位置を画面左上にマクロで移動したいと思います。
マクロの記述方法を教えて下さい。
現在は、iroi=MsgBox("継続して入力しますか",4+32,"確認")
と記述しています。

KMisawa

unread,
Sep 7, 2009, 7:12:40 PM9/7/09
to
VBAでのMsgBoxの書式では表示位置を指定する項目はありません。

以下ははkMado氏作成の拡張メッセセージバックスの作成サンプルです。
kMsgboxを表示するには mdlMsgbox をコピーしておくことが必要です。
構文
Ans=kMsgbox(prompt[, buttons] [, title] [, helpfile, context])Color&
Wait&(秒)
      本文    ボタン  表題  ヘルプファイル      文字色 表示秒数


Position&(1-4) Left&,Top&(ピクセル単位)CaptionOK$ CaptionCancel$,
      表示位置              置換え文字列 

HideButton As Boolean ,HideCaption As Boolean HideSysMenu As Boolean)
     OKボタン非表示     ×ボタン非表示

詳細は http://homepage2.nifty.com/kmado/kvba.htm  を開き
E00M86 ダイアログを指定位置へ表示する をご覧ください。なお、その末尾の
高度なMsgBoxのカスタマイズ(上記の構文の出典)を参照ください。

KMisawa   silv...@discussions.microsoft.com

"K.kakiuchi" <K.kak...@discussions.microsoft.com> wrote in message
news:9654D974-4C51-40AD...@microsoft.com...

0 new messages