请问,excel中怎么把一列数据间隔插入到另一列数据中?

如图,1~16数字的列是紧密挨着的,怎么讲1~16间隔插入到A~G列中?变成A,1,B,2,C,3,D,4……

温馨提示:答案为网友推荐,仅供参考
第1个回答  2019-04-29

你好,楼主!这个也可以使用VBA程序进行处理,几行代码就搞定。当然,为了一个小小的问题而采用VBA程序处理,似乎有点“杀鸡焉用宰牛刀”,不过学学也好。

(1)VBA程序代码如下所示:

Sub Intset_i()
Dim i1, i2
On Error Resume Next
Set mysheet1 = ThisWorkbook.Worksheets("Sheet1")  '定义工作表Sheet1
i2 = 1   'i2初始值

For i1 = 2 To 1000  '从第2行到1000行
 If i1 Mod 2 = 0 And mysheet1.Cells(i1, 1) <> "" And mysheet1.Cells(i1 + 1, 1) = "" Then
 '如果是偶数行且此单元格不是空白且下一个单元格是空白,则
  i2 = (mysheet1.Cells(i1 + 1, 1).Row - 3) / 2 + 2   '获取B列对应数值所在的位置
  mysheet1.Cells(i1 + 1, 1) = mysheet1.Cells(i2, 2)  '把B列相应的数值插入A列的空白单元格中
 End If
Next

End Sub

(2)程序的运行结果如下截图所示:

本回答被网友采纳
第2个回答  2019-04-29

见样表截图,C1输入

=IF(ISODD(ROW()),OFFSET($A$1,ROW(A1)-1,),OFFSET($B$1,INT((ROW(A1)-1)/2),))

公式下拉

余下的工作你自己处理

第3个回答  2019-04-29

步骤如下所示:

有疑问随时联系~

第4个回答  2019-04-29
假如从第一行开始,把A列每单元格内容插入到B列每单元格内容前面:
先在C1输入=A1&B1,往下复制公式,再选中所有复制结果,再点复制,点击B1,右键,选择性粘贴,在菜单里选“数值”,确定。最后删除C列。
相似回答