-2

次のようなExcelシートデータ（配列形式に変換）があります

1st row......['one', , , , 'Folder', 'Folder', 'Extended Data', 'Extended Data', 'Extended Data','Extended Data' ],
2nd row.....['ID', 'Label', 'Longitude', 'Latitude', 'Country', 'City', 'Inventory', 'Safety stock', 'weight', 'hdsjka'],
3rd row......['AFKBL', 'Kabul, Afghanistan', 69.136749, 34.53091, 'Afghanistan', 'Kabul', 12, 1845, 12, 1845],
4th row......['AFKDH', 'Kandahar, Afghanistan', 65.700279, 31.61087, 'Afghanistan', 'Kandahar', 18, 1193, 18, 1193], ....etc etc

「拡張データ」（1行目）の下にある2行目のすべての値を取得し、別のファイルの単一の列配列に書き込みたい..

この列配列を使用して、Google チャートでコントロール ラッパーを作成したいと考えています。

誰かがマクロを書いて、これについて私を助けてくれれば、本当に感謝しています..

4

1 に答える 1

0

配列がどのように見えるかはよくわかりませんが、配列セルをループすることで、必要なデータを簡単に取得できるように思えます。必要なデータが既にある配列 ("oldarr") の行 2 と列 4 から 7 にあるとします。その後、newarr(4,1) の新しい配列を作成するだけです。

dim newarr(4,1)
for j = 1 to 4
newarr(j,1) = arr(2, (j+3)) ''cycles across the needed columns on the second row 
next j

その後、newarr の内容を好きな場所に貼り付けることができます。

さて、これは単純すぎてマクロを実行する必要がないように思えます。ただし、どの配列列に必要な情報が含まれるかがわかっている限り、一般的なアプローチは有効です。私が考えることができる唯一の微妙な点は、各反復でコピーする必要がある行または列の数がわからない場合 (この場合、動的配列を使用できます)、または「拡張データ」を含む列が変更される可能性がある場合です。 .

これが少なくとも始めるのに役立つことを願っています。

于 2013-08-04T20:29:56.540 に答える