如果#NA指示的B列与#NA下面的数据不同，则将数据与指示符#NA一起使用

Question

我一直在尝试编写有关如何在＃N / A行中包含相同数据以及下面的数据的代码。我将提供一个示例来进一步解释该过程。谢谢大家

Answer 1

这应该相当快地遍历A和B列。

Option Explicit

Sub bFromNA()
    Dim i As Long, str As String, e as long

    With Worksheets("sheet2")

        e = .range("A:A").specialcells(xlCellTypeFormulas, xlerrors)(1).row

        For i = e To .Cells(.Rows.Count, "B").End(xlUp).Row
            If IsError(.Cells(i, "A")) Then
                str = .Cells(i, "B").Value2
            Else
                .Cells(i, "A") = str
            End If
        Next i

    End With

End Sub