דילוג לתוכן
  • דף הבית
  • קטגוריות
  • פוסטים אחרונים
  • משתמשים
  • חיפוש
  • חוקי הפורום
כיווץ
תחומים

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

💡 רוצה לזכור קריאת שמע בזמן? לחץ כאן!
  1. דף הבית
  2. תוכנה
  3. הוספת נתונים לאחר מיון בטופס אקסס

הוספת נתונים לאחר מיון בטופס אקסס

מתוזמן נעוץ נעול הועבר תוכנה
5 פוסטים 2 כותבים 239 צפיות
  • מהישן לחדש
  • מהחדש לישן
  • הכי הרבה הצבעות
התחברו כדי לפרסם תגובה
נושא זה נמחק. רק משתמשים עם הרשאות מתאימות יוכלו לצפות בו.
  • nachN מנותק
    nachN מנותק
    nach
    כתב ב נערך לאחרונה על ידי
    #1

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

    תודה רבה

    תגובה 1 תגובה אחרונה
    0
    • nachN מנותק
      nachN מנותק
      nach
      כתב ב נערך לאחרונה על ידי nach
      #2

      אני חושב שאולי לא הסברתי את עצמי מספיק טוב,

      לכן אצרף צילומי מסך ופירוט,

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

      image.png

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

      לצורך כך יצרתי טופס עדכון:

      image (1).png

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

      יש למישהו פיתרון??
      @OdedDvir ?

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

      image (2).png

      אשמח מאוד למענה! תודה. (לא יפה להקפיץ הודעה ישנה שלי, אבל בכ"ז חשבתי אולי לא הבינו את השאלה)

      OdedDvirO תגובה 1 תגובה אחרונה
      0
      • OdedDvirO מנותק
        OdedDvirO מנותק
        OdedDvir
        השיב לnach ב נערך לאחרונה על ידי OdedDvir
        #3

        @nach אמר בהוספת נתונים לאחר מיון בטופס אקסס:

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

        כמה דברים חשובים:

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

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

        1. לגבי השדה V הייתי מחליף לשדה בינארי (כן\לא), עם ערך ברירת מחדל של "כן".
          תוכל באופן חד פעמי לעדכן את השדה ברשומות הקיימות ל-True על ידי שאילתת עדכון, למרות שלכאורה זה לא מה שאתה מבקש, הרי אתה רוצה שרק בעדכון הוא יהפוך ל-כן. תשתמש בארוע לפני עדכון של הטופס כדי להפוך את הערך ל-כן.
        nachN תגובה 1 תגובה אחרונה
        1
        • nachN מנותק
          nachN מנותק
          nach
          השיב לOdedDvir ב נערך לאחרונה על ידי
          #4

          תודה על המענה המפורט !!

          @OdedDvir אמר:

          כמה דברים חשובים:

          1. בטופס העדכון התיבה המשולבת צריכה להיות לא מאוגדת לשום שדה.

          התיבה אכן אינה מאוגדת!

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

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

          OdedDvirO תגובה 1 תגובה אחרונה
          0
          • OdedDvirO מנותק
            OdedDvirO מנותק
            OdedDvir
            השיב לnach ב נערך לאחרונה על ידי
            #5

            @nach אמר בהוספת נתונים לאחר מיון בטופס אקסס:

            אנסה ליצור קוד רלוונטי,

            בגדול הקוד הוא כזה:

            Private Sub MyComboBox_AfterUpdate()
                If IsNull(MyComboBox.Value) Then
                     RunCommand acCmdRecordsGoToNew 'צור רשומה חדשה
                     Exit Sub
                End If
                Me.RecordsetClone.FindFirst "ID=" & MyComboBox.Value
                Me.Recordset.Bookmark = Me.RecordsetClone.Bookmark
            End Sub
            
            תגובה 1 תגובה אחרונה
            1

            בא תתחבר לדף היומי!
            • התחברות

            • אין לך חשבון עדיין? הרשמה

            • התחברו או הירשמו כדי לחפש.
            • פוסט ראשון
              פוסט אחרון
            0
            • דף הבית
            • קטגוריות
            • פוסטים אחרונים
            • משתמשים
            • חיפוש
            • חוקי הפורום