Runtime Error 380: Could Not Set the RowSource Property. Invalid Property Value

[archrael]

Hi All,

I am a newbie in VBA and was trying to create a userform that will allow me to track what my people are doing. it compose of parts where data should be inputed.

One part is choosing between options in combobox.
The chosen option in combobox1 will dictate the list of items available in combobox2.
I have made it work in the first userform.

What I did, and this is where the problem starts, is to export that userform so I can recreate it and import in the same workbook. The reason behind this is because I have 4 options (using command buttons) and each options will load userforms. the userforms will have the same inputs but will vary in the validations of the comboboxes.

So i have imported the exported userform and named it userform2. i have defined the parameters of the combobox1 in this userform that will dictate the list available in its combobox2. this is where I am getting the error below:

Runtime Error 380: Could Not Set the RowSource Property. Invalid Property Value

it is in the below code where I am getting the error:

    .RowSource = strRange

Below is the code I used, which is copied from google too. This is the same code loaded in the original userform that i exported

Private Sub ComboBox1_Change()
Dim strRange As String
    If ComboBox1.ListIndex > -1 Then
       strRange = ComboBox1
       Label2.Caption = strRange
       strRange = Replace(strRange, " ", "_")
            With ComboBox2
                .RowSource = vbNullString
                .RowSource = strRange
                .ListIndex = 0
            End With
    Else
       Label2.Caption = "New Business"
    End If
End Sub

Please note that I did not change anything in the codes. i did however change the RowSource to the appropriate one.
Also, the list for validations are all in the same tab but on different rows.


Hope someone can help as I don't know what to do anymore.


Thanks,
John Mend

 

[Norie]

John

Are you trying to populate ComboBox2 using a named range?

If so does that named range exist in the workbook the userform is in?

 

[bobsan42]

what is the value of strRange when you try to assign it as row source for combobox2?

I would guess it is some text that Excel cannot understand. strRange must be a range address or name.

 

[archrael]

HI Norie and Bob,

It seems like the code can't find the name range. thanks for the idea thrown and it helps a lot. i was able to figure out what happened.

 

[excel_lelkes]

Hi John


I hade the same problem. I solved this with this code:

Private Sub UserForm_Initialize()
    food = Range("list!$C$3:$C$10")
    cmbM1.List = food
    
End Sub

At least it's working on my macOS sierra and excel 2011 for mac

Regards
Peter