![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?8acaa2e)
お世話になります。
ExcelのVBAで、split関数を使って配列に格納したデータの要素数を調べる方法がわかりません。
下記のようなコードで、読み込んだデータを配列(Arraydata)に格納することは出来たのですが、test.csvの要素数が処理の度に変わるため、要素数に応じて後続の処理を行ないたいと考えています。
Open test.csv For Input As #1 ' test.csvファイルを開く
Line Input #1, test.csv ' データ行を読み込む
Arraydata = Array(Split(test.csv, ",")) ' 配列に格納
よろしくお願いします。
No.2ベストアンサー
- 回答日時:
こんにちは。
>Arraydata = Array(Split(test.csv, ",")) ' 配列に格納
Split で配列になっているものを、さらに配列にしても、何も取れないはずです。それ自体は、以下のようになるのですが、
Arraydata = Split(test.csv, ",")
>ExcelのVBAで、split関数を使って配列に格納したデータの要素数を調べる方法がわかりません。
データの添え字を調べてどうするのでしょうか?
そのままでは、 添え字は、
Lbound(Arraydata) ~Ubound(Arraydata)
なんでしょうから、Option Base 1 でもしていなければ、0 ~上限までです。
だから、次は、ワークシートに貼り付けるぐらいしかありませんから、例えば、ワークシートに貼り付けるなら、そのまま、配列を貼り付ければよいと思います。
i = i + 1
Range("A1").Offset(i).Resize(, UBound(Arraydata) + 1).Value = Arraydata
なんていうことをしますね。
ワークシートへの貼り付け方法までご教授頂きありがとうございました。
また、配列への格納は、ご指摘頂いた通り「Array」が冗長でした。
要素数を調べた後、For文でセルへのセット処理を回そうと考えていたのですが、このようなスマートな方法で出来るとわかり、勉強になりました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excelにて、フォルダ内のTextファイルをマクロで統合すると文字化けしてしまう時の解消コード 4 2023/01/01 07:32
- Excel(エクセル) エクセルのVBAについて とあるサイトのコードを参考に、CSVの文字化けを直すVBAを作成しているの 7 2022/11/04 14:15
- Excel(エクセル) PowerQueryに詳しい方教えてください(Office365) 1 2022/07/24 21:11
- Visual Basic(VBA) 複数csvを横に追加していくマクロについて 2 2023/04/25 09:19
- Visual Basic(VBA) 複数のcsvファイルをExcelに一括変換したい 2 2023/03/03 12:44
- PHP htmlで複数の個数入力欄を表示させるには 1 2022/09/20 03:11
- Excel(エクセル) csvに別のExcelの文章を差し込む 2 2023/04/01 16:06
- Ruby 初心者プログラミング 3 2022/10/12 11:31
- C言語・C++・C# c言語の問題です 課題1 (二分探索木とセット) 大きさ size の配列 array を考える。す 2 2023/01/10 21:08
- その他(プログラミング・Web制作) Sikulix2.0.5(Jython2.7.3)でcsvを読込WEB検索条件にpasteで文字化け 1 2023/03/31 11:02
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAのautofilter、criteriaの配...
-
隣同士の数字を足し合わせる
-
チェックボックスのperlでの値...
-
perl 配列の要素数について
-
エクセルVBAでTransposeの不思議
-
2次元配列のコピーについて
-
VB6で配列の最大値を簡単に求め...
-
FORTRAN90で書式に変数を使いたい
-
perl初心者です。わかる方お願...
-
perlで配列の要素が空なのを知...
-
VBScript 配列
-
VBA 多次元配列を用いてグルー...
-
Perlで<select multiple>の複数...
-
VBA 二次元配列 ループの書き方
-
画面を強制的に再描画させる方法
-
ListBox 複数選択 で オートフ...
-
VBA Dir関数でファイルをループ...
-
VBAでの一時停止と再開の方法
-
DOSコマンドのループ内のTIMEコ...
-
DoEventsが必要な理由について
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Dim flag(4) as boolean で配列...
-
VBAのautofilter、criteriaの配...
-
二次元配列のインデックスについて
-
二次元配列における要素数のは...
-
エクセルVBAでTransposeの不思議
-
クラスに配列を渡す方法
-
リストボックスに縦スクロール...
-
マクロ Publicでの配列定義
-
Excel VBA ユーザーフォームの...
-
文字の整列(printf)
-
perlで配列の要素が空なのを知...
-
perl 配列の要素数について
-
Strawberry Perl for Windows ...
-
VBA 二次元配列の1つ目を増...
-
チェックボックスのperlでの値...
-
perl 初等プログラミングについて
-
DBIを使ってSelect文 複数のカ...
-
複数のキーで配列をソートする...
-
Excel(VBA)で配列の要素数を...
-
newで個別に生成した配列にNULL...
おすすめ情報