Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
55049 / 76732 ←次へ　｜　前へ→
【26463】Re:変数にするためには
回答  かみちゃん  - 05/7/6(水) 6:39 -
引用なし
パスワード
   こんにちは。かみちゃん　です。

>ループ中に変数を変えていきたいので
>（"a" & n )を変数にしたいのですが
>文字のa1となってしまいます。
>a1という変数にしてa1の中に格納され
>ている物を取り出すためにはどのように
>書いたらよいでしょうか？

配列を使ったらいかがでしょうか？
Sub Test()
　Dim a As Variant
　Dim i As Integer
　
　a = Array("", a1, a2, a3, a4)
　
　a(1) = 10
　a(2) = 20
　a(3) = 30
　a(4) = 40
　
　For i = 1 To 4
　　MsgBox a(i)
　Next
End Sub

また、過去にも同様な質問が出ていました。
http://www.vbalab.net/vbaqa/c-board.cgi?cmd=ntr;tree=18139;id=excel
0 hits
▼ 【26462】変数にするためには 子犬 05/7/6(水) 4:39 質問
【26463】Re:変数にするためには かみちゃん 05/7/6(水) 6:39 回答≪
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
55049 / 76732 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free