Sub Macro2()
Dim mystr As String
mystr = "1"
If IsDate(mystr) = False Then
MsgBox "NO"
End If
End Sub
これなら日付型かどうかを取得できるのに、
Sub Macro1()
Dim mystr As String
mystr = "1"
If IsNumber(mystr) = False Then
MsgBox "NO"
End If
End Sub
だと、IsNumberがコンパイルエラーになります。
変数に入っている値が数値として評価できるかを取得する方法を教えてください。
No.3ベストアンサー
- 回答日時:
こんにちは。
これは初歩的なことではあっても、最初はなかなか手こずります。こういうことは、教えもらったほうが早いようです。
#2さんのおっしゃる通り、IsNumberは、ワークシート関数ですから、VBA上での使い方はお分かりになるとは思いますが、しかし、私は、VBAでは、IsNumber は使いません。
ただし、Cells のText プロパティでも同じ反応ですが、String型のデフォルト値は、""(長さ0の文字列)です。基本的には、String型で値を取ることはしません。それに、ふつうは、Cellsから直接取り出すことは避けたほがいいです。一端、変数に入れてから、判定させたほうがよいです。ワークシートの数式は、関数に関数を重ねますが、VBAなどの言語では、あまり関数や数式をネストしないほうがよいと言われます。
IsNumeric VBA関数は、少し意味合いが違います。「[数字]かどうか」という判定で、「[数値]かどうか」ではありません。もちろん、以下のようなワークシート関数を応用したコードはあるとは思いますが、これだと、他のVBAやVBでは応用できません。(英語で考えると変ですね。数値というのは、"Numeric"です。数字は、"Figure" です。もしかしたら、名前付けの時に間違えたかもしれません。(^^;)
'//
Sub Macro3()
Dim myVal As Variant
Dim myVal2 As Double
myVal = "1"
If WorksheetFunction.IsNumber(myVal) Then
MsgBox myVal2
Else
MsgBox "Not Numeric: " & myVal
End If
End Sub
'VBA関数を使う場合は、上記とはマクロとしての目的が違いますが、このようにします。
'あえて、Double型にしましたが、不要な場合はLong型にしてもよいです。
Sub Macro4()
Dim myVal As Variant
Dim myVal2 As Double
myVal = "1"
If IsNumeric(myVal) Then
myVal2 = CDbl(myVal) '直接入れるわけにはいかないし、Val関数を使うと丸められてしまう。
MsgBox myVal2
Else
MsgBox "Not Numeric: " & myVal
End If
End Sub
'//
'なお、Macro3,4 の Dim mystr As String は myVal As Variant にしました。
'String型なのに、他のものを入れても同じことですから。
No.2
- 回答日時:
紛らわしいですが、数値かどうか評価する関数は
IsNumber:ワークシートで使う関数と、
IsNumeric:マクロ(VBA)で使う関数の2つあります。
この2つは使うところだけでなく入力に対する挙動にも違いがあり、
またセルの .value か .text を対象にするかでも違いがあります。
http://ameblo.jp/sukiti/entry-11325623598.html
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) VBAについて 3 2022/06/19 18:19
- Visual Basic(VBA) 【VBA】写真の貼り付けコードがうまく機能しません。 5 2022/09/01 18:43
- Visual Basic(VBA) VBAが止まります。 3 2022/08/31 14:09
- Visual Basic(VBA) オブジェクトが見つかりません 1 2023/06/24 19:43
- Visual Basic(VBA) いつもお世話になっております、VBAで教えて頂きたいのですが 2 2022/05/05 22:20
- Visual Basic(VBA) 【Excel VBA】自動メール送信の機能追加 5 2022/09/29 12:53
- Visual Basic(VBA) VBAのユーザーフォームのテキストボックスに入力制限をしたい 6 2022/11/15 08:28
- Visual Basic(VBA) 稀に1円合いません? Sheet1から金額と個数を貼り付ける下記コードで、金額を切り上げるコードを何 3 2022/09/05 15:11
- Visual Basic(VBA) VBAでoutlook365が起動しません。 4 2022/08/25 13:31
- Visual Basic(VBA) batからexeを実行し戻り値を受け取る バッチからEXEの結果を受け取りたいのですが、 下記のバッ 1 2023/07/04 15:13
このQ&Aを見た人はこんなQ&Aも見ています
-
外出時に「待たせる妻」vs イライラする「待つ夫」は日本だけ?見習いたい海外事情
夫の家事参加に積極的なイメージのある海外でも、同様の事例はあるのか。結婚カウンセラーの佐竹悦子さんに伺ってみた。
-
VBAにてデータが数字か文字かを判定するには
Access(アクセス)
-
「Columns(A:C")」の列文字を数字にして表記したい"
Excel(エクセル)
-
ある文字列が全て数字であるかどうかをチェックするには?
Visual Basic(VBA)
-
-
4
VBA シートのボタン名を変更したい
Visual Basic(VBA)
-
5
ExcelのVBA。public変数の値が消える
Visual Basic(VBA)
-
6
数字以外の入力をエラーにするには?
Visual Basic(VBA)
-
7
EXCEL VBA で指定した範囲に入力があるかどうか?
Visual Basic(VBA)
-
8
エクセルでエラーが出て困っています。
Excel(エクセル)
-
9
テキストボックス(VBA)でEnterを押したときに作動するマクロ
Access(アクセス)
-
10
VBAコード記述に際して、コード全体を自動的にインデント付ける方法
Access(アクセス)
-
11
VBAでの割り算の余りの求め方
Excel(エクセル)
-
12
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
13
EXCEL あるセルに数字が入力されれば既存マクロ実行させたい
Excel(エクセル)
-
14
VBAのコマンドボタンの文字列の改行方法は?
Visual Basic(VBA)
-
15
Access2010 Enterで次テキストへ移動
その他(Microsoft Office)
-
16
文字列から英数字のみを抽出する関数
Excel(エクセル)
-
17
テキストボックスのvalueとtextの違い
Visual Basic(VBA)
-
18
会社の共有フォルダのIPアドレスを表示する方法
Windows 7
-
19
Accessのコマンドボタンの立体化について
Access(アクセス)
-
20
Application.ScreenUpdating = Falseが効きません
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
首吊りどこ締めるの
-
至急!尿検査前日にオナニーし...
-
尿検査前日に自慰行為した時の...
-
中出しをするとお腹が痛い・・・。
-
腕を見たら黄色くなってる部分...
-
射精をして1週間以内に尿検査を...
-
白血球が多いとどんな心配があ...
-
勃起する時って痛いんですか? ...
-
彼女のことが好きすぎて彼女の...
-
尿検査の前日は自慰控えたほう...
-
検便についてです。 便は取れた...
-
精子が黄色?
-
これって喉仏ですか? 私は女性...
-
精子に血が・・・
-
納豆食べた後の尿の納豆臭は何故?
-
EXCELで式からグラフを描くには?
-
2つの数値のうち、数値が小さい...
-
excelのIF関数 A,Bの大きいほ...
-
小数点以下を繰り上げたものを...
-
EXCELで条件付き書式で空白セル...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
至急!尿検査前日にオナニーし...
-
首吊りどこ締めるの
-
尿検査の前日は自慰控えたほう...
-
尿検査前日に自慰行為した時の...
-
検便についてです。 便は取れた...
-
白血球が多いとどんな心配があ...
-
中出しをするとお腹が痛い・・・。
-
射精をして1週間以内に尿検査を...
-
彼女のことが好きすぎて彼女の...
-
腕を見たら黄色くなってる部分...
-
勃起する時って痛いんですか? ...
-
変な話しになります。尿検査で...
-
これって喉仏ですか? 私は女性...
-
EXCELで条件付き書式で空白セル...
-
男です。昨日の午後3時くらいに...
-
今朝、毎朝の習慣でオナニーし...
-
納豆食べた後の尿の納豆臭は何故?
-
1日前の検尿
-
値が入っているときだけ計算結...
-
精子が黄色?
おすすめ情報