תחומים - פורום חרדי מקצועי

@איש-ימיני אמר באקסס | עדכון בטבלה לפי מספר זהות:

זה לא מסובך?

בכנות - לא. לפחות הדברים הבסיסיים, ואתה לא תסדר באקסס בלי זה.

ואם לא איך לומדים את זה?

תחפש בגוגל "SQL בסיסי"...

והאם תוכל לתת לי הגדרה ספציפית לזה?

בשמחה, אחרי שתכיר קצת את הנושא יהיה לי קל יותר לכוון אותך...

@איש-ימיני אני מציע לך ללמוד קצת SQL בסיסי. זה דבר מאד פשוט ב SQL לקשר טבלאות על ידי JOIN

@איש-ימיני בוא נניח שהנתונים היו לא באקסל אלא בטבלה מקומית בתוך האקסס. האם אז אתה יודע כיצד לעדכן את הנתונים?

@dovid אמר באקסס | יצירת רשימה לפקד משולב:

תצלם צילומי מסך, תצרף שגיאות וכל מה שצריך כדי שיהיה קל לעזור לך (וממילא שלא יהיה מצב שנדמה ש@OdedDvir עובד אצלך).

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

@איש-ימיני עליך לייבא את האקסל לתוך אקסס ואז ליצור שאילתת עידכון רגילה

@אביי יש לך כמה שגיאות:

1. השדה CityID לא מוגדר כמספר אלא כטקסט
2. הקוד מוצמד לתיבת הרשימה הלא נכונה cboStreet במקום cboCity
3. מונה עמודות צריך להיות 2 בשתי התיבות
4. רוחב עמודות צריך להיות 2;0 כדי להסתיר את עמודה השדה המזהה
5. השאילתות לא היו מוגדרות נכון...
   מצ"ב קובץ מתוקן1587412275437-database1.accdb

@אביי אמר באקסס | חיפוש בטופס:
קודם כל, תעביר את הקוד לפרוצדורה נפרדת:

Private Sub ApplyFilter()
    
        'Purpose:   Build up the criteria string form the non-blank search boxes, and apply to the form's Filter.
        'Notes:     1. We tack " AND " on the end of each condition so you can easily add more search boxes; _
                               we remove the trailing " AND " at the end.
    
'        ..... כל שאר הקוד
    End Sub

ותקרא לה מתוך הארוע של תיבת הטקסט

Private Sub Filter1_AfterUpdate()
    ApplyFilter
End Sub

ותקרא לה גם מתוך הלחצן:

Private Sub cmdFilter_Click()
    ApplyFilter
EndSub

כך נכון לעשות מכל הבחינות

שנית, אתה יכול להכריח לעבור לפקד הבא לאחר העדכון של תיבת הטקסט, על ידי שימוש בSetFocus(), למשל אם אתה רוצה לעבור אחרי לחיצת אנטר לפקד txtSomeControl:

Private Sub Filter1_AfterUpdate()
    ApplyFilter
    Me.txtSomeControl.SetFocus
End Sub

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

שלום לכולם.
אתמול החלפתי לאשתי את המכשיר Samsung1200 המיתולוגי למכשיר דור 3 שכתוב עליו FirstPhone.
דא עקא, אשתי לא הפסיקה להתלונן על כאבי ראש בשימוש או אפילו במעבר ליד המכשיר... בקיצור פניתי לסוכן שיחליף את המכשיר. הוא נתן לי דגם אחר, גם של FirstPhone. שוב התופעה חזרה על עצמה.... לבסוף הוא התרצה לקבל גם את המכשיר השני בחזרה, וקיזז 50 ש"ח מההחזר.
השאלה שלי היא: האם מישהו מכיר את התופעה? האם זה קורה דווקא בחברה הנ"ל או בכל מכשיר דור 3? והאם מישהו יכול להמליץ על מכשיר כשר דור 3 ללא שום תופעות לוואי?

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

@אביי הניחוש שלי שהמקור נתונים של התיבות המשולבות שלך לא מכיל עמודת שדה מפתח (ID) אלא רק עמודה של שמות של רחובות?
הקוד יעבוד רק אם העמודה המאוגדת של כל תיבה תהיה שדה המפתח (=מספר), ולא שם העיר או הרחוב (=מחרוזת)
זה טירחה בשבילי ליצור את הכל כעת, אבל אשמח לעזור לך אם תשלח לי את הקובץ שלך.

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

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

@אביי בהנחה שיש לך טבלה בשם StreetList שמכילה את השדות הבאים:

StreetID, StreetName, CityID

ובטופס יש שתי תיבות רשימה משולבת בשמות

cboStreet, cboCity

אתה יכול לכתוב משהו כזה:

Private Sub cboCity_AfterUpdate()
    cboStreet.RowSource = _
        "SELECT [StreetID], [StreetName] " & _
        "FROM [StreetList] " & _
        "WHERE [CityID]=" & Nz(cboCity.value, "NULL") & " ORDER BY [StreetName];"
    cboStreet.Requery
End Sub

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

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

=[ID] & " " & [FirstName] & " " & [LastName]

@הבוס-הגדול
בהסרטה שעשית רואים שכתבת את הנוסחה בתא הלא נכון.
רשמת אותה בתא שמכיל את המספר. אתה צריך לרשום אותה בתא שמשמאל למספר:
עליך להשאיר את הטור עם המספרים (טור A) ולרשום את הנוסחה הנ"ל בטור B. תלך לתא B1 ותדביק שם את הנוסחה, ואז תשכפל אותה למטה על כל שאר הטור

@לילה-לבן יש כאן כמה הצעות לפתרון:

1. אם אתה מנגן את הקובץ ישירות מהנגן דרך כבל USB תנסה להעתיק אותו למחשב ולנגן משם.
2. תכבה את ההגנה נגד העתקה בMediaPlaye.
3. תתקין חבילת מקודדים עדכנית.
4. לפעמים זו בעיה בהגדרות צליל. לחץ קליק ימני על סמל הרמקול ובחר פתור בעיות.
   עיין שם לעוד אפשרויות

0xc00d36c4

מה המספר הזה, זה שם הקובץ או קוד הודעת שגיאה שאתה מקבל? אם זה קוד שגיאה - של איזו תוכנה?

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