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

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

אגב @ניהול למה א"א להוסיף תגיות?

אגב @dovid יש לך מושג לגבי זה? זה דווקא מאוד יעיל ונח..

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

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

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

@OdedDvir וואי וואי, כמה שגיאות תודה על כל העזרה!!
(פשוט החלטתי לכבוד הקורונה לקדם את כל הדברים והפרויקטים שנתקעתי בהם, ויש ביניהם הרבה אקססים)

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

@OdedDvir לא עובד לי משום מה מצ"ב קובץ
database1.accdb

@OdedDvir הכפתור חיפוש הוא "cmdFilter" איך אני עושה בקוד לאחר עידכון שכביכול יילחץ עליו?

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

Private Sub Filter1_AfterUpdate()
    '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.
    '           2. The date range works like this: _
                        Both dates      = only dates between (both inclusive. _
                        Start date only = all dates from this one onwards; _
                        End date only   = all dates up to (and including this one).
    Dim strWhere As String                  'The criteria string.
    Dim lngLen As Long                      'Length of the criteria string to append to.
    Const conJetDate = "\#mm\/dd\/yyyy\#"   'The format expected for dates in a JET query string.
    
    '***********************************************************************
    'Look at each search box, and build up the criteria string from the non-blank ones.
    '***********************************************************************
    'Text field example. Use quotes around the value in the string.
    If Not IsNull(Me.Filter1) Then
        strWhere = strWhere & "([עיר] Like ""*" & Me.Filter1 & "*"") AND "
    End If
    
    'Another text field example. Use Like to find anywhere in the field.
    If Not IsNull(Me.FilterCity) Then
        strWhere = strWhere & "([משפחה] Like ""*" & Me.FilterCity & "*"") AND "
    End If
    
    If Not IsNull(Me.Filter2) Then
        strWhere = strWhere & "([אזור] Like ""*" & Me.Filter2 & "*"") AND "
    End If
    
    '***********************************************************************
    'Chop off the trailing " AND ", and use the string as the form's Filter.
    '***********************************************************************
    'See if the string has more than 5 characters (a trailng " AND ") to remove.
    lngLen = Len(strWhere) - 5
    If lngLen <= 0 Then     'Nah: there was nothing in the string.
        MsgBox "היי, אנחנו לא יכולים לחפש אם לא אמרת לנו מה לחפש :)", vbInformation, "שגיאה"
    Else                    'Yep: there is something there, so remove the " AND " at the end.
        strWhere = Left$(strWhere, lngLen)
        'For debugging, remove the leading quote on the next line. Prints to Immediate Window (Ctrl+G).
        'Debug.Print strWhere
        
        'Finally, apply the string as the form's Filter.
        Me.Filter = strWhere
        Me.FilterOn = True
      End If
End Sub

@שוהם307 אחרי הקורונה של הסינים, את מי זה מעניין איזה פלאפון סיני שעושה כאבי ראש?

@שוהם307 לא ברור... למי יש כח לעשות באלגן... מחליפים פלאפון וממשיכים הלאה..

@לילה-לבן אמר בUnlimited Email Tracker - תוסף כרום חינמי למעקב אחרי מיילים שנשלחו:

אגב, מישהו יודע על תוסף של אייקון מיקרופון במייל (שמאפשר להכתיב לו....)???

יש על זה דיון במתמחים, תחפש שם. (משהו בסגנון של, "איך עושים את זה???")

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

@שוהם307 נכון, לכן הוא החליף...

@OdedDvir אמר בטלפון שעושה כאב ראש???:
אני יכול להחזיר לך על כל העזרה

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

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

@OdedDvir הסתבכתי עם זה קצת, תוכל להעלות את זה כקובץ מוכן?

@nigun אני אישית לא בדקתי אבל חבר שמבין בזה אמר לי.

@שעטנ-ז-ג-ץ אמר בהילד מזיק ומזיק - נעילת מקרר - היאך?:

שום דבר לא מחזיק לי במקרר

גם הנעילה?

@OdedDvir תודה על העצה, שיניתי את זה ל 4.5 מה שמשאיר לי מקום לפקדים.

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

@chetz321 עיין כאן https://mitmachim.top/topic/4275/בנוגע-לאיחסון-שותפים-בגוגל-דרייב?_=1587385781676

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

@משחזר-מידע טעות בעידכון..