未記入がある場合はマクロを実行させない方法

至急、教えてください。

現在EXCEL2010にてマクロを使用し、印刷実行ボタンを作っています。
その際に、あるセルが空欄の場合はそのマクロを実行しない、
出来れば「未記入箇所があります」といった表示が出るようにしたいと思っています。

何か良いアイディアをお願いいたします！

No.1 ベストアンサー 回答者： merlionXX 回答日時： 2011/01/06 11:15

一例です。

仮にあるセルがSheet1のA1なら

Sub 印刷ボタン()
　　If Sheets("Sheet1").Range("A1").Value = "" Then
　　　　MsgBox "未記入箇所があります！", vbCritical, "Σ（￣ロ￣lll) "
　　　　Exit Sub
　　Else
　　　　ActiveWindow.SelectedSheets.PrintOut
　　End If
End Sub

ではいかがでしょう。

この回答へのお礼

ありがとうございます～～！！
理想通り完成できました。
素早い回答をありがとうございました<(_ _)>

お礼日時：2011/01/06 12:48