Assigning '=FILTER' Value to variable giving 2015 Error

[vbaNumpty]

I am getting a 2015 Error and I cannot figure this one out for the life of me.

I have the following table with a working FILTER formula:

But in VBA I get a 2015 Error:

Just showing that the = Value is calculating correctly

Any help with this?

 

[Fluff]

Can you post your actual code, rather than an image. How to Post Your VBA Code

 

[vbaNumpty]

Private Sub PID_Change()
'This will make the colour selection populate with only appropriate results
    Dim ClrList As Worksheet
    Dim PckList As Worksheet
    Dim Fields As Worksheet
    Dim GrnPlant As Variant
    Dim pkSize As Variant
    Dim i As Integer

    Set ClrList = Worksheets("Color List")
    Set PckList = Worksheets("Packsize")
    Set Fields = Worksheets("Fields Lists")
    
    Me.AssBox.Clear
    Me.AssBox.Enabled = False
    
    
    pkSize = Evaluate("=FILTER(PackSize[Pack Size],PackSize[Product ID]= """ & Me.PID.Value & ""","")")
    'CaseQty.List = Evaluate("=FILTER(PackSize[Pack Size],PackSize[Product ID]=""" & PID.Value & ""","")")
    
    GrnPlant = Evaluate("=INDEX(GreenPlant[Green Plants],MATCH(""" & Me.PID.Value & """,GreenPlant[Green Plants],0))")
        
    If IsError(GrnPlant) Then
        AssBox.Enabled = True
    End If
    
    For i = 2 To Fields.Range("M" & Application.Rows.Count).End(xlUp).Row
        Me.AssBox.AddItem Fields.Range("M" & i).Value
    Next i

End Sub

There you are sir!

 

[RoryA]

You appear to be missing some quotes at the end:

"=FILTER(PackSize[Pack Size],PackSize[Product ID]= """ & Me.PID.Value & ""","""")"

 

[vbaNumpty]

You appear to be missing some quotes at the end:

"=FILTER(PackSize[Pack Size],PackSize[Product ID]= """ & Me.PID.Value & ""","""")"

 

[vbaNumpty]

You appear to be missing some quotes at the end:

"=FILTER(PackSize[Pack Size],PackSize[Product ID]= """ & Me.PID.Value & ""","""")"

Of course it would be something as simple as quotes. Man I am dumb..

Would you happen to know how I could assign this filters values to a combobox now ?

 

[Fluff]

Something like

Me.ComboBox1.list=pkSize

 

[vbaNumpty]

Something like

Me.ComboBox1.list=pkSize

I need to step away from the computer.. Thanks! I was about to tell you I tried that and realized I assigned the list to the wrong box

 

[Fluff]

Glad we could help & thanks for the feedback.