编写宏来将3列转换为1行

时间:2013-09-11 07:53:35

标签: excel

我的数据如下所示,我需要将3列转换为1行。当我向下移动样品时,行位置需要改变。我对Excel一直不熟悉(使用2013)。任何帮助都会很精彩。我需要做这几百次切割和粘贴然后转置需要太长时间。有什么想法吗?

-5.13E+01   -1.99E+02   -1.53E+00
-5.86E+01   -2.12E+02    2.05E+00
-6.61E+01   -2.21E+02    7.45E+00
-6.67E+01   -2.34E+02    1.29E+01
-6.38E+01   -2.46E+02    1.57E+01
-3.90E+01   -2.56E+02    2.54E+01
-1.51E+01   -2.44E+02    2.33E+01
-1.02E+00   -2.31E+02    1.23E+01
-8.72E-01   -2.21E+02    4.19E+00
-1.39E+00   -2.10E+02    1.42E+00
-5.88E+00   -2.00E+02   -1.41E+00
-1.08E+01   -1.89E+02   -1.52E+00
 6.15E+00   -2.27E+02   -2.09E+01
-3.11E+00   -2.25E+02   -1.97E+01
-1.96E+01   -2.29E+02   -1.00E+01
-2.52E+01   -2.32E+02   -4.73E+00
-4.17E+01   -2.35E+02    2.48E+00
-4.44E+01   -2.46E+02    6.48E+00
-4.22E+01   -2.60E+02    1.02E+01
-5.32E+01   -2.30E+02    2.18E+00

干杯

1 个答案:

答案 0 :(得分:0)

我认为这有效,但我建议检查!:

=IF(COLUMN()<24,INDEX($A$2:$C$21,COLUMN()-3,1),IF(COLUMN()<44,INDEX($A$2:$C$21,COLUMN()-23,2),INDEX($A$2:$C$21,COLUMN()-43,3)))  

在D1中并复制,假设-5.13E+01在A2中,依此类推。

(即使它确实如此,但它可能远非理想,只是迄今为止你提供的最佳报价。)