Hello,
I have the following code but is giving me error 381 when I try to run the macro. For now, I have only one entry in my database in column A and over time more will be added. I need combobox1 to give me the list of entries in column A even if I have only or more than one. Can I please have your help to make the below code work as described in the above?
Thank you.
Private Sub UserForm_Initialize()
With Sheets("Database")
Me.ComboBox1.List = .Range("A4", .Range("A" & Rows.Count).End(xlUp)).Value
End With
End Sub
I have the following code but is giving me error 381 when I try to run the macro. For now, I have only one entry in my database in column A and over time more will be added. I need combobox1 to give me the list of entries in column A even if I have only or more than one. Can I please have your help to make the below code work as described in the above?
Thank you.
Private Sub UserForm_Initialize()
With Sheets("Database")
Me.ComboBox1.List = .Range("A4", .Range("A" & Rows.Count).End(xlUp)).Value
End With
End Sub