How to get unique record using vba array.

Publié le: 12 mai 2020
sur la chaîne: 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

Sur cette page du site, vous pouvez voir la vidéo en ligne How to get unique record using vba array. durée heure minute seconde en bonne qualité , qui a été Téléchargé par l'utilisateur VBA Learning tutorials 12 mai 2020, Partagez le lien avec vos amis et connaissances, sur youtube cette vidéo a déjà été regardée 2,069 fois et il a aimé 31 téléspectateurs. Bon visionnage!

260