VBA：上拉特定行數據

Question

我有excel表數據（i轉換成陣列形式），它看起來像以下

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 

欲拉，根據「擴展數據來自所述第二行中的所有值'（在第一行） 並將其寫入單個列陣列中的另一個文件中。

我想要使用此列數組在google圖表中創建控件包裝。

我真的很感激，如果任何人都可以寫一個宏，幫我在這..

Answer 1

我不能完全讓你的陣列看起來多麼像什麼，但在我看來，這些數據你想應該通過遍歷數組單元格可以很容易地獲得。 說你想要的數據在你已有的數組的第2行和第4列到第7列（「oldarr」），那麼你只需要創建一個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的內容，只要你喜歡。

現在，這似乎太簡單了，不需要一個宏來做，這就是爲什麼我認爲我必須失去一些東西。然而，只要你知道哪個數組列將包含你想要的信息，通用方法就成立了。我能想到的唯一微妙之處在於，如果您不知道在每次迭代中需要複製多少行或列（在這種情況下，您可以使用動態數組），或者如果包含「擴展數據」的列可以更改。

希望這至少可以幫助你開始。