エクセル ＢＶＡ メッセージボックスの作り方

エクセルを開くと、メッセージボックスで、警告を出したいのですが
出来れば・・文字を２行目のみ中央寄せ。さらに１行と２行の間に行間を２つ程いれたいのですが・・やり方がわかりません。
一応、途中まで作りましたが、　アドバイスの程よろしくお願い致します。
----------------------------------
Private Sub Workbook_Open()

Dim strMsg1 As String

Dim strMsg2 As String

strMsg1 = "この ファイルは上書き保存できません "

strMsg2 = "作成者：　○○"

MsgBox strMsg1 & vbCrLf & strMsg2

End Sub
------------------------------------

No.1 回答者： project-a 回答日時： 2007/03/27 16:38

MsgBoxでは、メッセージのセンタリングは出来ないので、

２行目の文字数を取得して、センタリングされるように前方にスペースを追加するような処理を入れてみてはいかがでしょうか？

この回答へのお礼

パソコンのトラブルで　お礼が遅くなりました。
アドバイス　ありがとうございます★

お礼日時：2007/04/30 23:58