Excel VBA質問箱 IV

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

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


11533 / 13646 ツリー ←次へ | 前へ→

【15628】文字列 − 数値変換 田中 04/6/30(水) 22:55 質問[未読]
【15629】Re:文字列 − 数値変換 IROC 04/6/30(水) 23:09 回答[未読]
【15630】Re:文字列 − 数値変換 田中 04/7/1(木) 0:00 お礼[未読]

【15628】文字列 − 数値変換
質問  田中  - 04/6/30(水) 22:55 -

引用なし
パスワード
   VBAを利用してマクロを作成しておりますが、
型変換がうまくできません。
STRING型(文字列)からLONG型への変更は
CLNG()関数を
その逆は
CSTR()関数を利用して書いているのですが、以下のような
場合、型が違いますとメッセージが帰ってきます。

Dim suuti As Long
Dim mojiretu As String
suuti=cLng(mojiretu)

"mojiretu"には"1234"のような
複数桁の数値を示す文字列が入っています。
エラーメッセージを解消するための
情報がありましたらお知らせください。

【15629】Re:文字列 − 数値変換
回答  IROC  - 04/6/30(水) 23:09 -

引用なし
パスワード
   値が入っていないからでは?

Sub a()
Dim suuti As Long
Dim mojiretu As String
  
  mojiretu = "1234"
  suuti = CLng(mojiretu)
  
  MsgBox TypeName(suuti) & suuti
End Sub

【15630】Re:文字列 − 数値変換
お礼  田中  - 04/7/1(木) 0:00 -

引用なし
パスワード
   ▼IROC さん:
>値が入っていないからでは?
>
>Sub a()
>Dim suuti As Long
>Dim mojiretu As String
>  
>  mojiretu = "1234"
>  suuti = CLng(mojiretu)
>  
>  MsgBox TypeName(suuti) & suuti
>End Sub

ご指摘の通りでした。
値が入っていませんでした。
mojiretuは配列で定義していて
初期化する関数で値を
入れていましたが、その内容が
以下のようなもので結局
何も入っていない状態でした。

for 1 to 100
mojiretu(i) = """"
next

早急なご回答ありがとうございました。

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