Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


18684 / 76732 ←次へ | 前へ→

【63487】Re:数字と漢字について
発言  よろずや  - 09/11/10(火) 23:31 -

引用なし
パスワード
   ▼ponpon さん:
>▼ちょこり さん:
>> A
>>1 123
>>2 りんご
>>3 357
>>
>>上記のような場合のことです。
>
>こんなんでは?
>
>Sub test()
> Dim r As Range
> 
> With Sheets("Sheet1")
>  For Each r In .Range(.Cells(1, 1), .Cells(.Rows.Count, 1).End(xlUp))
>   If IsNumeric(r.Value) Then
>     MsgBox r.Address & "は、数字です"
>   Else
>     MsgBox r.Address & "は、数字ではありません"
>   End If
>  Next
> End With
>
>End Sub

セルに 1E1 と入力してみてください。
値が 10 になりますね。
次のセルに '1E1 と入力してみましょう。
1E1 と表示されますね。
その状態で、上のプロシージャを実行してみましょう。
0 hits

【63481】数字と漢字について ちょこり 09/11/10(火) 21:34 質問
【63482】Re:数字と漢字について ichinose 09/11/10(火) 21:53 発言
【63484】Re:数字と漢字について ちょこり 09/11/10(火) 22:48 発言
【63486】Re:数字と漢字について ponpon 09/11/10(火) 23:20 発言
【63487】Re:数字と漢字について よろずや 09/11/10(火) 23:31 発言
【63488】Re:数字と漢字について ponpon 09/11/10(火) 23:46 発言
【63489】Re:数字と漢字について ponpon 09/11/10(火) 23:49 発言
【63490】Re:数字と漢字について ichinose 09/11/10(火) 23:49 発言
【63491】Re:数字と漢字について ちょこり 09/11/11(水) 7:04 お礼
【63493】Re:数字と漢字について Jaka 09/11/11(水) 10:32 発言
【63494】Re:数字と漢字について ちょこり 09/11/11(水) 14:16 お礼

18684 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free