« 右クリックメニューをカスタマイズする | メイン | 右クリックメニューをカスタマイズする »

固有のメッセージをポップアップさせない

pplicationオブジェクトのDisplayAlertsプロパティにfalseをセットします。
下の例ではDisplayAlertsプロパティがTrueの場合とFalseの場合で、シートを削除したときの振舞いの違いが確認できます。


Sub エクセル固有のメッセージをポップアップさせない()
Dim sh As Worksheet

Application.DisplayAlerts = True
Set sh = Worksheets.Add
sh.Name = "NweSheet"
MsgBox "DisplayAlerts = True"
sh.Delete

Application.DisplayAlerts = False
Set sh = Worksheets.Add
sh.Name = "NweSheet"
MsgBox "DisplayAlerts = False"
sh.Delete

Application.DisplayAlerts = True

End Sub

ひとつ前の投稿は「右クリックメニューをカスタマイズする」です。
次の投稿は「右クリックメニューをカスタマイズする」です。

トラックバック

このエントリーのトラックバックURL:
http://www.xillion.net/mova/mt-tb.cgi/88

コメントを投稿

(いままで、ここでコメントしたことがないときは、コメントを表示する前にこのブログのオーナーの承認が必要になることがあります。承認されるまではコメントは表示されません。そのときはしばらく待ってください。)

About

2004年01月24日 00:00に投稿されたエントリーのページです。

メインページアーカイブページも見てください。

Powered by
Movable Type 3.34