ok!! I've worked it out :D
Silly me didn't know where to look to find the form control name :p (top left, where cell reference is)
So... after renaming my combo [cmbPO], I created a macro to filter the table on the Order number field for each value in the drop down:
Sub Records3004()
' Records3004 Macro
Range("GE_Prt2Rec[[#Headers],[Order No]]").Select
ActiveSheet.ListObjects("GE_Prt2Rec").Range.AutoFilter Field:=1, Criteria1 _
:="3004"
End Sub
and then associated the following code with the combo box:
Sub RuncmbPO()
With ThisWorkbook.Sheets("POs").Shapes("cmbPO").ControlFormat
Select Case .List(.Value)
Case "3004": Records3004
Case "3005": Records3005
Case "3006": Records3006
Case "3007": Records3007
Case "3008": Records3008
Case "3009": Records3009
Case "3010": Records3010
End Select
End With
End Sub
it might be a little clumsy but it workd :D thankyou for you help
Bookmarks