エクセルVBAで指定した変数にユーザー定義の値を格納する方法について

最近の書き込み件数：今日 0件、昨日 0件
未読分：2件

Excel VBAでIEを思いのままに操作できるプログラミング術 Excel 2013/2010/2007/2003対応

近田伸矢, 植木悠二, 上田寛

IEのデータ収集＆自動操作のプログラミング本はこの1冊だけ！IEの起動やポップアップウィンドウ、表示を制御する基本的なコードはもちろん、テキストボックスやラジオボタン、表、ハイパーリンクなどのHTML部品を制御する方法など、自動操作に欠かせないノウハウを丁寧に解説。

Message#2 2015年2月5日(木)19時41分
From: doctppdf

返事削除変更

変数のデータ型は何で設定していますか？

Rangeオブジェクトの場合Valueプロパティで参照するとそのままの値がセットされますが、Textで参照するとセルに設定してある表示形式で値を取得します。

一度型を調べるなりしてみるといいと思います。

Sub sumple()
　　Dim str As String
　　str = Range("B1").Text
　　Msgbox str
End Sub

Sub sumple2()
　　Dim str As String
　　str = Range("B1").value
　　Msgbox str
End Sub

他にも4桁取得を前提に

Sub sumple3()
　　Dim str As String
　　str ="AB" & range("B1").value
　　Msgbox str
End Sub

でもいけると思います。一括で登録する場合はfor～nextステートメントで変数に格納する予定だと思いますので、cells(i,"B")などで一括登録すればよいかと思います。

Message#1 2015年2月5日(木)19時37分
From: ユーザー定義

返事削除変更

現在、エクセルVBAにて指定した変数にユーザー定義の値を格納できないか考えています。

ユーザ定義を利用してそれぞれのセルに入力するのですが、例えば以下のように

セルB1に　AB1111
セルC1に　AB2222
セルD1に　AB3333
セルE1に　AB4444
セルF1に　AB5555

とデータが入力されていたとします。

データは6桁で先頭の2桁が「AB」で決まっていて後ろの4桁が数字となります。
ユーザー定義では「AB****」で下四桁だけ数字を入力するようにしています。

ここからさらにエクセルVBAを利用して、変数iにAB1111を格納したいのですが、
変数iは1111と数字４桁しか取得できませんでした。

変数iにAB1111を取得したいのですが、どなたか方法を教えてください。
よろしくお願いします。