【最大10000ポイント】当たる!!質問投稿キャンペーン!

以下の処理を実行して、「代入されています。」というメッセージを表示したいのですが、
どのようにすれば良いのでしょうか?
Sub 代入の確認()
Dim mySheet As Worksheet
If mySheet Is Nothing Then
MsgBox "代入されていません。"
Else
MsgBox "代入されています。"
End If
End Sub

A 回答 (1件)

mySheetってなんでしょうか?


「代入されています。」と表示したいだけなら、Nothingで判定する前にmySheetに何かを代入しておけばいいだけです。
例えば、
Set mySheet = ActiveSheet
とか。
    • good
    • 0
この回答へのお礼

「代入されています。」と表示されました。ありがとうございました。

お礼日時:2010/11/28 23:51

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!


人気Q&Aランキング