VBA可以在行中更改excel数据转置

i had input like below

我输入如下

1   10
2   20
3   30
1   40
2   50
4   60
1   80
1   10
2   20