Hello.

Scenario:
Windows10, MS365
Xcel.

ComboListBox activeX
4 datalist in another page called: Data
1 linked cell


I try to list data from 1 of 4 diffrent lists, shown in 1 combolistbox (and its 2 columns)



Choices, shown permanent in 1st column
"DATA1"
"D...2"
"
"
all choices of string type

Lists:
List1 List2 List3 List4
Max 170 lines of data in each list or and better, use actual number of items in each lists

The linked cell is set to a free cell, containing name of choice choosen.

What I try to achieve is:
when data(stringtype) in free cell is altered, set listfillrange to proper List (1 of 4) which will, hopefully
show the content of list in column no 2 in the combolistbox :)
The code belw is surely, at its best, very poor as this is all new to me.

VB code
Private Sub ComboBox1_Change()
If ComboBox1.LinkedCell = "Skedsmo" Then
ComboBox1.ListFillRange = "Data(a2:a113)"

End If
End Sub

ah, I probably need the choice list and 1 empty list. Last one, to be filled with 1 of th 4 lists.

Best attach a workbook with this in.

What I hope to achieve is:
A combodropdown list on each row (starting at row 2), in column N (Gard) achieveing this:

showing 4 detectable items:SKEDSMO SØRUM NES BLAKER NITTEDAL (SHOWN IN label Data) in first column of combobox

Clicking on one of theese items,i.e.: SKEDSMO, will show all data beneat this in
the 2nd column of the same combobox.

Pic1 in sheet named Work
Pic2 in sheet named Data

regards

Attached Images

	pic1.png (2.1 KB, 11 views)
	pic2.png (22.7 KB, 10 views)

@ Jan Eikeland: Kindly attach images to your posts here (via the Advanced tab) instead of inserting links to other web sites.

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

A workbook please! Not a picture of one…

Problem solved elsewhere. Thank You.