GEORGE PERRY
03-07-2021, 04:43 PM
Please i need some help on this i am learner in this field. this is the issue i am having.
28067
Sub Add_Product_List()
Dim sh As Worksheet
Set sh = ThisWorkbook.Sheets("Product_Master")
Dim I As Integer
Me.Cmb_Product.Clear
Me.Cmb_Product.AddItem ""
For I = 2 To Application.Worksheetsfunction.CountA(sh.Range("A:A"))
Me.Cmb_Product.AddItem sh.Range("B" & I)
Next I
28067
Sub Add_Product_List()
Dim sh As Worksheet
Set sh = ThisWorkbook.Sheets("Product_Master")
Dim I As Integer
Me.Cmb_Product.Clear
Me.Cmb_Product.AddItem ""
For I = 2 To Application.Worksheetsfunction.CountA(sh.Range("A:A"))
Me.Cmb_Product.AddItem sh.Range("B" & I)
Next I