list box not populating

[ysherriff]

I am updating this spreadsheet from a data validation drop down to list box but for some reason, my list box data is not being shown on the listbox. The listbox data is being added via vba.

The vba code is located on sheet ("corporate dashboard")

This is my first time doing a listbox with up and down command button, i.e drill down. I really appreciate the help to show me what i am doing wrong.

Thanks

 

[Hui]

A few things going on here

1. Change the following code as marked by the comment

Private Sub Worksheet_Activate()

  Dim strLevel As String
  strLevel = getSelectedLevel

  Select Case strLevel
  Case "GLC DIRECTCONNECT" ' This used to say "GLC-DIRECTCONNECT"
  Call addItemFormListBox("LIST_DIRECTCONNECT")
   
  Case "MARKET"
  Call addItemFormListBox("LIST_MARKET")
   
  Case "LIVINGCENTER"
  Call addItemFormListBox("LIST_LIVINGCENTER")
  End Select

End Sub

2. Check the Named Formula
Check the Named Formula LIST_DIRECTCONNECT
I think it should be
=OFFSET('Trend Control'!$A$1,1,,COUNTA('Trend Control'!$A:$A)-1,1)

 

[ysherriff]

Thank you Hui. Let me revise and see if it works.

Thanks

 

[ysherriff]

HUI, how are you? I am getting a invalid property value. What does that mean and what am i doing wrong? I apologize. This is my first foray into using listbox and i retrieved this vba code from a former colleague and trying to adjust it.

i appreciate your help.

 

[Hui]

It is working fine
But there are no values under
GLC-DIRECTCONNECT

can you tell us under what situations / values it isn't working