Good morning
I am trying to populate a ComboBox with a list of names that is contained in another, unlinked, workbook called Busstops.xlsm in a range named "Stopnames" can some one please help.
Option Explicit
Private Sub ComboBox1_Click()
' Select option and place value into the selected cell
Selection = ComboBox1.Value
Unload Form_Select_Stop
End Sub
Private Sub UserForm_Initialize()
'Fill the listbox
With ComboBox1
.AddItem "hello"
.AddItem "Bye"
.AddItem "three"
.AddItem "three"
.AddItem "three"
.AddItem "three"
.AddItem "three"
.AddItem "three"
.AddItem "three"
.AddItem "three"
.AddItem "three"
.AddItem "three"
.AddItem "three"
.AddItem "three"
.AddItem "three"
.AddItem "three"
.AddItem "three"
.AddItem "three"
.AddItem "three"
End With
End Sub
Bookmarks