Lebans open form relative to control

Using the fantastic bit of code found at http://www.lebans.com/openform.htm

Is there a quick way to also filter the opened form, same as
DoCmd.OpenForm ?

In the following event handler, [frmTicket, popup of Buttons] is
opened, but I need it to be filtered with
"[TicketID]=" & [TicketID]


Private Sub ButtonCount_Click()
' 2 = Right Side
Dim rc As Integer
rc = PositionFormRelativeToControl("frmTicket, popup of Buttons",
ButtonCount, 2)
End Sub