עזרה באקסס - חיפוש בטופס

[איש פלוני]

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

[איש ימיני]

@איש-פלוני
אולי זה יוכל לעזור לך.

[איש פלוני]

@איש-ימיני תודה, אבל זה מסביר איך עושים חיפוש בכמה שדות ביחד, אבל לא מסביר איך יוצרים את החיפוש. אני צריך לדעת איך יוצרים את החיפוש.

[OdedDvir]

@איש-פלוני נא עיין בחוקי הפורום:

פרסום מקביל: אין לפתוח נושא בתחומים על נושא שנפתח על ידי אותו כותב (או מי מטעמו) בפורום/אתר אחר במקביל, ולהיפך - אין לפתוח בפורומים אחרים נושא שנפתח פה, אלא אם כן מדובר בנושא של בקשת עזרה וכדומה ועברו שלושה ימים לפחות מהפרסום המקורי בהם לא התקבלה העזרה המבוקשת בנושא.

[איש פלוני]

@odeddvir לא ידעתי. מתנצל. לא יקרה שוב.
עכ"פ, אשמח לעזרה...

[OdedDvir]

@איש-פלוני אם אתה מתכוון לסינון, זה מבוצע בקלות על ידי המאפיין Filter של הטופס:
למשל

Me.Filter = "UserID=" & ID

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

[איש פלוני]

@odeddvir
סליחה שאני שואל, אבל אין לי את הידע לדעת מה התכוונת...
מה שמוקף במרכאות זה שם התיבה שבה יש את הנתונים שלפיהם צריך לסנן?
והID שאחרי ה& זה שם השדה שיסונן לפי הנתונים בתיבה?
לגבי אנגלית, התחלתי כבר להשתמש בחלק מהשמות באנגלית לפי מה שיעצת לי בעבר, אבל אני עדיין צריך להתרגל.

[avi rz]

@איש-פלוני אמר בעזרה באקסס - חיפוש בטופס:

סליחה שאני שואל, אבל אין לי את הידע לדעת מה התכוונת...
מה שמוקף במרכאות זה שם התיבה שבה יש את הנתונים שלפיהם צריך לסנן?
והID שאחרי ה& זה שם השדה שיסונן לפי הנתונים בתיבה?

אותו דבר, רק הפוך:

Me.Filter = "[InTable]=" & Me.InForm

תבדוק אם זה מספיק, כי לכאו' תצטרך לעשות איזה הפעלה של הפילטר ו/או ריענון.

[איש פלוני]

@avi-rz
אני כותב מה עשיתי:
יצרתי תיבת טקסט, הגדרתי בארוע "בעת לחיצה על מקש", קודMe.Filter = "[משפחה]=" & Me.InForm
הקלדתי שם משפחה בתיבה ו.... לא עשה כלום .
כנראה לא הבנתי נכון משהו. במה טעיתי?

[avi rz]

@איש-פלוני

• תנסה לעשות "אחרי עדכון", ולראות אם זה עובד.

• תנסה אחרי זה לרענן.

• או אולי להוסיף הקוד הבא:

Me.FilterOn = True

[איש פלוני]

@avi-rz
עשיתי ככה:

וכשאני מקליד אות עולה לי הודעת שגיאה:

[avi rz]

@איש-פלוני
ברור זה אמור להיות בתוך פונקציה.
אני רואה שבינתיים לא השתמשת בפונקציה של העדכון ולקרוא לה,
אז תכניס את זה בכל מקום שכתבת, "Me.filter = ...."
שורה מתחת.

[איש פלוני]

@avi-rz עשיתי ככה:

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

[avi rz]

@איש-פלוני
תוסיף

Me.Requery

[איש פלוני]

@avi-rz אמר בעזרה באקסס - חיפוש בטופס:

Me.Requery

אחרי מה להוסיף את זה?

[avi rz]

@איש-פלוני
עוד שורה בסוף הפונקציה של אחרי עדכון.

[איש פלוני]

@avi-rz לא עוזר.

[avi rz]

@avi-rz
אגב, שמתי לב שאתה מסנן לפי מחרוזת אז תוסיף גרשיים לפני ואחרי השדה שלפיו יהיה הסינון. כך:

Me.Filter = "[משפחה]=" & """" & Me.InForm & """"

[avi rz]

@avi-rz
אם זה עדיין לא עובד = אז זה כנראה בעיה אחרת בחלק לא משותף.
תוכל לבדוק גם:

DoCmd.SetFilter , "[משפחה]=" & """" & Me.InForm & """"

[איש פלוני]

@avi-rz אמר בעזרה באקסס - חיפוש בטופס:

@avi-rz
אגב, שמתי לב שאתה מסנן לפי מחרוזת אז תוסיף גרשיים לפני ואחרי השדה שלפיו יהיה הסינון. כך:

Me.Filter = "[משפחה]=" & """" & Me.InForm & """" ```

לא עזר

תוכל לבדוק גם:
DoCmd.SetFilter , "[משפחה]=" & """" & Me.InForm & """"

מעלה:

וכשאני לוחץ דיבוג: