Excel Combobox List

NoSparks · #4 01-06-2016, 02:45 PM

I'm not sure I follow what you're doing, and definitely don't follow when it's being done.
Using the _Change() event will fire the FillCombobox procedure every time any character is typed into the combo box.
I'd think you would want the drop downs to populate before entering anything.
Perhaps using the _GotFocus event instead of _Change.

Code:

Private Sub ComboBox1_GotFocus()
    Call FillCombobox("List", "A", Me.ComboBox1)
End Sub

and like this for the FillCombobox procedure

Code:

Sub FillCombobox(WSName As String, ColLtr As String, CBox As ComboBox)
    Dim LastRow As Long
Set ws = ActiveWorkbook.Worksheets("List")
With ws
    LastRow = .Cells(.Rows.Count, ColLtr).End(xlUp).Row
    CBox.List = .Range(ColLtr & "3:" & ColLtr & LastRow).Value
End With
End Sub

Thread Tools
Show Printable Version Email this Page
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Using combobox to pass data from an Excel spread sheet to text boxes on userform	Stewie840	Word VBA	14	12-17-2015 10:13 PM
combobox list gets reset....please help	Deepa Shrestha	Word VBA	1	09-29-2013 09:30 PM
VB code: populate combobox from columns in Excel file	billybeach	Outlook	2	04-27-2013 04:38 AM
Adding a long list of values to a combobox in Word 2003?	ll4u76	Word VBA	1	04-13-2012 03:37 AM
Populating ComboBox or Drop Down list with contents of a text field	Billy_McSkintos	Word VBA	1	09-13-2011 05:50 AM