ขอความรู้ ภาษา VBA หน่อยคับ ต้องการจะเอาค่าทีไม่ซ้ำใน array ออกมาพิมลงใน excel นะคับ

        Dim number As Integer
        Dim num As String
        Dim al As New ArrayList()
        If Not (al.Contains(number)) Then
            al.Add(number)
        End If
        ''To Get
        For Each number In al
            num = number.ToString()
        Next