Excel VBA質問箱 IV

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

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


52480 / 76732 ←次へ | 前へ→

【29090】Re:続けて質問ですが、オフセット位置の取得方法
お礼  りょうた  - 05/9/23(金) 20:35 -

引用なし
パスワード
   ▼Hirofumi さん:

ご回答ありがとうございます。

>もし、変数bookの値が数値なら("01"→1、"02"→2)、
>其の数値+4が変数Noの値に成れば善いのでは?
>VBAで、文字列を数値に評価する関数は、Val関数、Clng関数等が有ります
>Val関数は、空白の文字列、スペースの文字列、数字以外の文字列の場合
>0を返すので、この様な場合エラー処理をしなくても善い可能性が有るので
>Val関数を使うと善いでしょう?
>また、変数bookの範囲は、"01"〜"30"なのでそれ以外の場合、Subを抜けます

>  book = Val(Range("W137").Value)
>  If 1 <= book And book <= 30 Then
>    No = book + 4
>  Else
>    Exit Sub
>  End If

Val関数は、目から鱗が落ちる思いで感動です。
おかげですっきりした内容になりました。
実際には、01,02の様に数字だけではないのですが
セルにVLOOK関数を使用して、01,02の様に値が返る様にして
仕上げました。
応用すれば、うまくできるものなんですね。
ありがとうございました。
また、煮詰まりましたら、投稿すると思いますので
その際は、よろしくお願いいたします。

1 hits

【29025】商品CDを参照してコピーの方法 りょうた 05/9/21(水) 21:46 質問
【29033】Re:商品CDを参照してコピーの方法 awu 05/9/22(木) 0:37 回答
【29054】続けて質問ですが、オフセット位置の取得方... りょうた 05/9/22(木) 16:44 お礼
【29072】Re:続けて質問ですが、オフセット位置の取... Hirofumi 05/9/23(金) 0:42 回答
【29090】Re:続けて質問ですが、オフセット位置の取... りょうた 05/9/23(金) 20:35 お礼

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