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