【VBAユーザーフォームで閉じるボタンを表示したくない】

ユーザーフォームの右上閉じるボタン（×）を表示しない方法が見当たりません。
どなたかご存知の方、ご教授願います。

開発言語：Excel2000VBA
OS：Windows2000

No.2 ベストアンサー 回答者： JeanneNet 回答日時： 2005/06/20 18:46

こんにちは、じゃんぬねっと です。

API 使っても消せないかなぁ。
DeleteMenu で、システムメニューから「閉じる」を消すだけですから。

この回答へのお礼

じゃんぬねっとさん、回答ありがとうございます。

DeleteMenu（API）で要件どおり実装することができました。

http://www.asahi-net.or.jp/~ei7m-wkt/apitest2.htm

どうもありがとうございました。

お礼日時：2005/06/21 15:04

No.1 回答者： ta123 回答日時： 2005/06/20 17:27

おそらく×ボタンを非表示にする方法はないと思います。

当該ユーザフォームのイベントプロシージャ UserForm_QueryCloseを使って処理をキャンセルする代替方法があります。

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
'ユーザフォームの×ボタンが押された場合
If CloseMode = vbFormControlMenu Then
'処理をキャンセルする
Cancel = True
End If
End Sub

※MsgBoxでクローズできないメッセージを表示するのが親切かもしれません。

この回答へのお礼

早速の回答をありがとうございます。
VBでは×ボタン表示を制御できたので、VBAでもできるのかなと思っていました。
それらしきプロパティも見当たらなかったので、やはりイベントで拾って動作制御する方法しかないのですね。

お礼日時：2005/06/20 17:32