Excel VBAでセル内が"-"の時の判別方法

質問

Excel VBAで質問です。
セル内の値が-のとき、セル内の値をうまく取り出す方法はないでしょうか。
.Cells(a,b)="-"で実行してみたところ、偽になってしまいます。また、Visual Basic Editorで値をチェックすると.Cells(a,b)の値は"?"になってしまっていました。

セル内の値を適当な文字列（AAAなど）に変えて.Cells(a,b)="AAA"にすると真が返ってくるため、これ以外の部分でのバグではないと思います。

回答No.4

n-jun · ベストアンサー

Asc 関数で同じ値が返るかどうか。

MsgBox Asc("-") & "_" & Asc(.Cells(a, b).Value)

お礼

セルの値の方は63が返ってきました。
.Cells(a,b)="-" の代わりに Asc(.Cells(a, b).Value)=63
で実行すると真が返ってきたので、この方法を使いたいと思います。
回答ありがとうございました。

回答No.3

Dxak

＃２です

う～ん？少々気になるだけど・・・OSのバージョンとExcelのバージョンは？
ＳＰまたはＳＲまでお願いね

補足

OSはXPSP3、Excelは2002SP3です。

回答No.2

Dxak

> セル内の値が-のとき
と、言うのが、数値でマイナスの話？
そっちなら、If cells(a,b) < 0 Thenにすればよいと思うけど・・・
文字なら普通に、引っかかるよ

補足

数値ではなく文字です。
先ほどの補足では両方全角になっていますね。notepadやエディタでは半角で表示されたのですが…。
文字コードが原因だったりするのかな？
－

回答No.1

qualheart

試してみましたが「-」はちゃんと認識しましたが・・・
もしかしたら全角の「－」になってるとかじゃないですか？
ちなみに私が試したのは以下の簡単なVBAです。

If Cells(1, 1) = "-" Then
Cells(1, 2).Value = "True"
Else
Cells(1, 2).Value = "False"
End If

補足

－
"－"
セル内、プログラムとも半角になっています。（上の2つはそれぞれからコピーしました）