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

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

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

שאילתת עריכה בקוד vba אקסס

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

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

            Dim EditAbsent As Recordset
            Set EditAbsent = CurrentDb.OpenRecordset("רשימת תורמים")
            
            EditAbsent.Edit
                EditAbsent!נפקד = True
            EditAbsent.Update
    
    

    השדה של הסינון הוא קוד_תורם = XXXX
    אשמח לעזרה

    גילוי נאות: למי שיש לו בעיה עם העברית, אני מודע לבעיה אבל לצערי אני עובד על קובץ קיים מ- 2005 😞 .

    ניתן לפנות אלי גם ב al0548446188@gmail.com
    ותמיד... אבל תמיד תוכלו לשאול אותי ב :) כאן שאלות באקסל

    dovidD תגובה 1 תגובה אחרונה
    0
    • dovidD מנותק
      dovidD מנותק
      dovid ניהול
      השיב לאוריי ב נערך לאחרונה על ידי dovid
      #2

      @אוריי כתב בשאילתת עריכה בקוד vba אקסס:

      שאילתת עריכה

      המינוח הנכון זה שאילתת עדכון.

      @אוריי כתב בשאילתת עריכה בקוד vba אקסס:

      מה שחסר לי זה הסינון לפי קוד תורם שאני לא יודע איך לרשום אותו

      אתה מתכוון להעביר לשאילתה פרמטר.
      אני לא מספיק מכיר אבל זה נראה באינטרנט שמשתמשים עם CreateQueryDef (ובמקרה של שאילתת עדכון אז אח"כ Execute):

      https://stackoverflow.com/a/12528868/1271037

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

      מנטור אישי למתכנתים (ולא רק) – להתקדם לשלב הבא!

      בכל נושא אפשר ליצור קשר dovid@tchumim.com

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

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

        ניתן לפנות אלי גם ב al0548446188@gmail.com
        ותמיד... אבל תמיד תוכלו לשאול אותי ב :) כאן שאלות באקסל

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

          @אוריי לכאו' יש שתי אפשרויות.

          1. כמו שיש לך, רק עם סינון כך:
                  Dim EditAbsent As Recordset
                  Set EditAbsent = CurrentDb.OpenRecordset("select * from [רשימת תורמים] where קוד_תורם = 1")
                  
                  EditAbsent.Edit
                      EditAbsent!נפקד = True
                  EditAbsent.Update
          
          
          1. לעשות פשוט שאילתת עדכון בלי צורך בRecordSet, כך:
          Currentdb.Execute "update [רשימת תורמים] set [רשימת תורמים].נפקד = true where קוד_תורם = 1"
          

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

          תגובה 1 תגובה אחרונה
          3

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

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

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