excel两列所有数据穿插成一列数据

您可以使用Excel的“宏”功能将两列所有数据穿插成一列数据。具体步骤如下：

1. 打开Excel文件并按下“Alt + F11”进入“Visual Basic for Applications”界面。
2. 在左侧的“项目浏览器”中右键单击该工作簿并选择“插入”>“模块”。
3. 在新建的模块中输入以下代码：

Sub interleave()
    Dim x As Integer, y As Integer, z As Integer
    Dim rng1 As Range, rng2 As Range, rng3 As Range
    
    '将第一列的数据复制到第三列
    Set rng1 = Application.InputBox("Select the first column", "Interleave", Type:=8)
    rng1.Copy rng1.Offset(0, 2)
    
    '将第二列的数据插入到第三列
    Set rng2 = Application.InputBox("Select the second column", "Interleave", Type:=8)
    Set rng3 = rng1.Offset(0, 2)
    
    For x = rng2.Rows.Count To 1 Step -1
        rng3.Offset(1, 0).EntireRow.Insert
    Next x
    
    z = 1
    
    For x = 1 To rng1.Rows.Count
        rng3.Cells(z, 1).Value = rng1.Cells(x, 1).Value
        z = z + 1
        rng3.Cells(z, 1).Value = rng2.Cells(x, 1).Value
        z = z + 1
    Next x
End Sub

4. 按下“F5”运行宏。
5. 按照提示选择第一列数据和第二列数据的范围。
6. 宏将会将两列所有数据穿插成一列数据，并将结果输出到第三列中。

注意：在使用宏时，请先备份您的Excel文件以免数据丢失。