Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

8893 / 76732

←次へ　｜　前へ→


	【73407】Re:テキストファイルのデータをのセルに転記したい

UO3 - 13/1/5(土) 17:35 -


	引用なし

	パスワード

▼es さん：

配列からのデータの取り出しは、配列内の要素番号（インデックス）を与えて
For/Next で取り出す方法以外に、For Each/Next で配列内の要素を、Variant型変数に
あるだけ取り出す方法があります。

以下参考です。

Sub Test1()
　　Dim d(1 To 3)
　　Dim i As Long
　　
　　d(1) = "A"
　　d(2) = "B"
　　d(3) = "C"
　　
　　For i = 1 To UBound(d)
　　　　MsgBox d(i)
　　Next
　　
End Sub

Sub Test2()
　　Dim d(1 To 3)
　　Dim dx As Variant
　　
　　d(1) = "A"
　　d(2) = "B"
　　d(3) = "C"
　　
　　For Each dx In d
　　　　MsgBox dx
　　Next
　　
End Sub

240 hits

▼

【73400】テキストファイルのデータをのセルに転記したい es 13/1/5(土) 14:58