文字列かどうかの判定

例えばA1セルに入力せれているものが、数字（もしくは文字）であった場合プログラムを実行させようと考えています。

入力されている数字や文字列は一定では有りません。

If　数字（文字）であった場合　Then
Call ***
end If
の様な感じです。
過去ログの文字列検索を探しましたが、使った事の無いコードばかりでアレンジのやり方が全く分かりません。

数字の場合と文字列の場合の2通りの方法をご教示頂きたくよろしくお願い致します。

No.2 ベストアンサー 回答者： nda23 回答日時： 2008/12/19 09:38

VarType を使うのは？

Select Case VarType(Cells(1,1).Value)
　　Case vbInteger To vbCurrency
　　　　数値の処理
　　Case vbDate
　　　　日付の処理
　　Case vbString
　　　　文字列の処理
　　Case ・・・
End Select

http://tryasp.winscom.co.jp/document/vbscript/21 …

この回答へのお礼

この方法だと色々な分岐に使えますね。大変参考になりました。
ありがとうございます。

お礼日時：2008/12/24 21:52

No.1 回答者： fudiwara 回答日時： 2008/12/19 00:17

文字列が数値かどうかを判断するIsNumeric関数が使えます。

　If IsNumeric(文字列) then
　　　数字の時の処理
　Else
　　　文字列の時の処理
　End If

ではいかがでしょう？

この回答へのお礼

お礼が遅くなり大変申し訳ありません。
Ifの中に直接入れる方法は使った事が無かったので大変勉強になりました。
分岐の一部に使わせて頂きました。

お礼日時：2008/12/24 21:51