How to get unique record using vba array.

Publicado em: 12 Maio 2020
no canal de: VBA Learning tutorials

2,069

How to get unique record using vba array.

Sub GetUniqueNameUsingArray()

Dim rng As Variant

Dim i As Integer

Dim lrow As Integer

Dim arr As Variant

ReDim rng(1 To Sheet1.Range("A1").CurrentRegion.Rows.Count) As Variant

arr = Sheet1.Range("A1").CurrentRegion.Value

lrow = 2

For i = LBound(rng, 1) To UBound(rng, 1)

If WorksheetFunction.CountIf(Sheet1.Range("A1:A" & i), arr(i, 1)) = 1 Then

Sheet1.Range("B" & lrow).Value = arr(i, 1)
lrow = lrow + 1
End If
Next i

End Sub

Nesta página do site você pode assistir ao vídeo on-line How to get unique record using vba array. duração hora minuto segundo em boa qualidade , que foi baixado pelo usuário VBA Learning tutorials 12 Maio 2020, compartilhe o link com seus amigos e conhecidos, no youtube este vídeo já foi visto 2,069 vezes e gostou 31 espectadores. Boa visualização!

260