שלום,
בניתי פונקציה שקושרה למקש קיצור שבעת לחיצה ראשונה עליו תופעל הפקודה filter by form על מנת לקבוע סינון לטופס, ובעת לחיצה שניה תופעל הפקודה apply filter/sort על מנת להחיל את הסינון.

הפונקציה:
Public Function SetFilter()
If FilterIsOn = False Then
RunCommand acCmdFilterByForm
FilterIsOn = True
Else
RunCommand acCmdApplyFilterSort
FilterIsOn = False
End If
End Function

עכשיו, כאשר הטופס מופעל ידנית מחלון מסד הנתונים, אין כל בעיה והפונקציה עובדת נהדר.
הבעיה היא, שכאשר הטופס מופעל מהswitchboard, הפונקציה לא עובדת מכיוון שהיא מנסה להפעיל את הסינון גם על הטופס שעליו רציתי להפעיל וגם על הswitchboard, והדבר לא ייתכן מכיוון שבswitchboard לא ניתן להכניס סינונים.

יש לציין שכאשר אני ניגש לתפריט records ובוחר כל אחת מהפקודות הנ"ל, זה עובד וניתן לבחור סינון ולהחיל אותו, אבל כאשר אני קורא לפונקציה בעזרת מקש הקיצור, הבעיה מתרחשת.

יש למישהו רעיון?