メッセージボックス
A	セキュリティを「中ナカ」に設定セッテイします。
B	セキュリティを「高コウ」に設定セッテイしてください。
C	一度イチド画面ガメンを終了シュウリョウし、再度サイド画面ガメンを開ヒラいてマクロを「有効ユウコウにしてください。
D	セキュリティを「高コウ」に設定セッテイし、開ヒラいている画面ガメンを終了シュウリョウします。
Aｺｰﾄﾞ	MｓｇBox（"セキュリティを「中」に設定します。",VbOKCancel,"セキュリティ設定セッテイ"）
Bｺｰﾄﾞ	MｓｇBox（"セキュリティを「高コウ」に設定してください。",VbOKCancel,"セキュリティ設定セッテイ"）
Cｺｰﾄﾞ	MｓｇBox（"一度画面を終了し、再度画面を開いてマクロを「有効にしてください。"
						,VbOKCancel,マクロ有効設定"）
Dｺｰﾄﾞ	MｓｇBox（"セキュリティを「高」に設定し、開いている画面を終了します。"
						,VbOKCancel,"セキュリティ設定"）
便利ベンリ君クン終了シュウリョウ
	○セキュリティを「高コウ」に設定セッテイ要求ヨウキュウ。
		MｓｇBox（"セキュリティを「高コウ」に設定してください。",VbOKCancel,"セキュリティ設定セッテイ"）
	○開ヒラいているすべてのブック（Excel）を閉トじる。
		Workbooks.Close
	Sub　便利ベンリ君クン終了シュウリョウ（）
	'セキュリティを「高」に設定要求メッセージ。
	IF MｓｇBox（"セキュリティを「高コウ」に設定しましたか。",VbYesNo,"セキュリティ「高コウ」設定セッテイ確認カクニン"）＝
	VbYes　Then
	’すべてのブックを閉トじる
	MｓｇBox（”開ヒラいているすべてのExcelを閉トじます”）
	Workbooks.Close
	End　If
	End Sub