如何将列A中的数据排列到B列中的数据？

Question

A栏是我应该拥有的库存。 B栏是我收到的库存。

我缺少大量库存，不得不手动执行此操作。我想要的是每列中的数字以匹配＆amp; A中存在的B中不存在的数字，用于在B列中添加空格以表示它缺失：

我有什么：

我想要的是什么：

Answer 1

这是一个非常轻量级的VBA例程，可以满足您的需求：

Sub matchCells()
    Dim colARange As Range
    Dim colACell As Range

    'Change this to your Column A range size
    Set colARange = Sheet1.Range("A1:A5000") 

    'Iterate through each cell in your Column A Range
    For Each colACell In colARange.Cells

        'Check if the cell in Column A doesn't match the cell in Column B
        If Not (colACell.Value = colACell.Offset(0, 1).Value) Then

            'It doesn't match so shift Column B's cell down one
            colACell.Offset(0, 1).Insert Shift:=xlShiftDown
        End If

        'Now we loop again and we will continue shifting Column B down
        ' a cell until it matches. 

    Next
End Sub

Answer 2

您可以在C栏上尝试以下公式......应该在C栏中为您提供所需的结果。

=IF(ISNA(VLOOKUP(A1,$B$1:$B$10,1,FALSE)),"",VLOOKUP(A1,$B$1:$B$10,1,FALSE))

$B$1:$B$10是数据范围（B列中没有行）