COMBOBOX HELP

[NIPUL JARIWALA]

I am using a combobox and need help

I want if perticular row(i) and column number 48(AV) ="" then combobox should not add item in list


here is my code

Dim vList, d As Object, i As Long
vList = Sheet1.Range("C8", Sheet1.Cells(Rows.Count, "C").End(xlUp)).Value
Set d = CreateObject("system.collections.arraylist")
For i = LBound(vList) To UBound(vList)
      If Not d.contains(vList(i, 1)) Then
      d.Add vList(i, 1)
      End If
Next
d.Sort
ComboBox29.List = d.toarray

 

[Fluff]

How about

   Dim vList, d As Object, i As Long
   vList = Sheet1.Range("C8:AV" & Sheet1.Cells(Rows.count, "C").End(xlUp).Row).Value
   Set d = CreateObject("system.collections.arraylist")
   For i = LBound(vList) To UBound(vList)
      If vList(i, 46) <> "" Then
         If Not d.contains(vList(i, 1)) Then d.Add vList(i, 1)
      End If
   Next
   d.Sort
   ComboBox29.list = d.toarray

 

[NIPUL JARIWALA]

Thank you my friend

 

[Fluff]

You're welcome & thanks for the feedback.