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

[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 & """"

מעלה:

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

[avi rz]

@איש-פלוני
כותב שהטופס לא מאוגד.

[איש פלוני]

@avi-rz מה זה אומר?

[avi rz]

@איש-פלוני
תפתח את המאפיינים של הטופס > נתונים >מקור רשומה > תבחר את הטבלה של התורמים.

[איש פלוני]

@avi-rz שיניתי את מקור הטופס הראשי לאותו מקור טופס של טופס המשנה,
כעת הוא לא נותן לי להקליד שום דבר בתיבה, כל מקש שאני לוחץ זה כאילו לחצתי על טאב והוא עובר לי לרשומה הראשונה בטופס המשנה.

[katz]

@איש-פלוני פיתרון פשוט מאוד!

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

me.שם פקד טופס המשנה.Requery