08/03/10 20:52:13
勉強中の者です。初歩的な質問で申し訳ないのですが、お力添えをお願いします。
条件分岐で、"A1"セルに何か入っている場合に実行、
空欄の場合はエラーメッセージを出したく思います。
if range("A1") = true then
msgbox("実行")
else
msgbox("空欄です。")
end if
としてみたのですが、思うように動作致しません。
てっきり、false = 0 、 true は何か要素がある。と頭にあったのでやってみたのですが、
VBAの壁にぶちあたっております。
何卒、ご助力を賜りたく存じます。よろしくお願いします。
994:デフォルトの名無しさん
08/03/10 20:57:49
=""
995:デフォルトの名無しさん
08/03/10 21:21:05
If Range("a1").Value <> "" Then
MsgBox "何か入っている"
Else
MsgBox "空欄"
End If
996:デフォルトの名無しさん
08/03/10 21:35:39
false = 0 、 true = -1
0 = false、 0以外 = true
997:デフォルトの名無しさん
08/03/10 22:03:18
if Typename(Range("A1")) <> "Empty" then ～
ではどうか
998:デフォルトの名無しさん
08/03/10 22:47:48
みなさんありがとうございます。
検証してる間にスレ落ちしてしまうと申し訳ないので、お礼だけ先に。
明日検証いたします。
本当にありがとうございました。
999:デフォルトの名無しさん
08/03/11 08:20:17
.
1000:小倉優子 ◆YUKOH0W58Q
08/03/11 08:20:37
1000ならジュースでも飲むか
1001:１００１
Over 1000 Thread
このスレッドは１０００を超えました。
もう書けないので、新しいスレッドを立ててくださいです。。。