Error trying to set table as rowsource ( SOLVED )

[rjchristensen]

Hello all,

I have been trying to get a selected table name from one listbox and make it the rowsource of a second listbox. When I click on a value in the first listbox, I get the following error message:

Run-time Error '380'
Could not set the rowsource property. Invalid property value.

The code is as follows:

>>> use code - tags <<<

Private Sub lbxTableList_Click()
    Dim strTableName As String
    If lbxTableList.ListCount <> -1 Then
        strTableName = "LU" & Trim(lbxTableList.Value)
        lbxTableValues.RowSource = strTableName
    End If
End Sub

When viewed via the debugger the variable strTableName value is shown as <Expression not defined in context>

Any help here would be greatly appeciated

TIA

Rich

 

[vletm]

rjchristensen
Moved Your Ask an Excel Question to VBA Macros.
Please reread Forum Rules

Site Rules - New Users - Please Read

Hi all, Welcome to the Chandoo.org Forums. Posting Rules & Etiquette The Chandoo.org Forums is a collaborative and happy place to learn and expand your Excel knowledge. The Chandoo.org Forums consist of several Sub-Forums based on the type of question/area of Excel you are interested in...

chandoo.org

 

[rjchristensen]

rjchristensen
Moved Your Ask an Excel Question to VBA Macros.
Please reread Forum Rules

Site Rules - New Users - Please Read

Hi all, Welcome to the Chandoo.org Forums. Posting Rules & Etiquette The Chandoo.org Forums is a collaborative and happy place to learn and expand your Excel knowledge. The Chandoo.org Forums consist of several Sub-Forums based on the type of question/area of Excel you are interested in...

chandoo.org

Thanks!

It's not showing up in the VBA Macros forum yet. Does this usually take time to happen?

 

[rjchristensen]

(Solved) - Bad data in lookup table
Hello all,

I have been trying to get a selected table name from one listbox and make it the rowsource of a second listbox. When I click on a value in the first listbox, I get the following error message:

Run-time Error '380'
Could not set the rowsource property. Invalid property value.

The code is as follows:

>>> use code - tags <<<

Private Sub lbxTableList_Click()
    Dim strTableName As String
    If lbxTableList.ListCount <> -1 Then
        strTableName = "LU" & Trim(lbxTableList.Value)
        lbxTableValues.RowSource = strTableName
    End If
End Sub

When viewed via the debugger the variable strTableName value is shown as <Expression not defined in context>

Any help here would be greatly appeciated

TIA

Rich