Excel表格列表

Question

我正在寻找一个插件或宏来将Excel中的表转换为List。我可以为此开发一个VB代码，但它看起来像其他人可能已经解决的问题。

问题的简化版本是：

来源

-       -        -       2010 2009 
Spain  Male  Population   54    53
Spain  Femal Population   64    63
Spain  Male  PIB          2     3 

结果

Spain  Male  Population  2010 54 
Spain  Male  Population  2009 53 
Spain  Femal Population  2010 64
Spain  Femal Population  2010 63
...

非常感谢帮助。

Answer 1

您可以使用多个OFFSET公式重新订购数据

如果您的数据位于A：E

G1中的
• 放=OFFSET(A$2,(ROW()-1)/2,0)并复制到colulm I和down
• 在H1中输入`= OFFSET（$ D $ 1 ,, MOD（ROW（）+ 1,2））并复制
I1中的
• 放=OFFSET($D$2,INT(ROW()-1)/2,MOD(ROW()+1,2))

如果您愿意，可以在VBA中运行