怎么把一行变两行excel表格

1.如何excel 表中同一行的数据转换成两行,不是简单的复制粘帖,而是

Sub obook()

For i = 1 To 16 Step 2

Sheets("sheet1").Rows(i).Select

Selection.Copy

Sheets("sheet1").Rows(i + 1).Select

Selection.Insert Shift:=xlDown

Next i

End Sub

说明一下：

拷贝上面的编码，启用excel的vba，插入模块，粘贴上述代码，注意如下几点：

1. 由于步长是2，所以如果你要操作的数据有100行，就将for i=1 to 16中的16改成200（即100*2）

2. 默认你要操作的表的名称是sheet1，根据实际自己改吧。

3. 由于你问题没有描述清楚，我理解是对一行变成两行的意思是完全复制。