סקרן 0
-
@ארי כן
טופס רגיל של הזנת נתונים לתוך טבלה -
זה נשמע לי דבר ממש פשוט, אבל לא הצלחתי למצוא על זה כלום בגוגל...
אני רוצה לעשות כפתור בטופס שיבטל את המילוי של כל הנתונים בטופס, דהיינו שהמידע שהזנתי בטופס לא יישמר - שכל השדות יחזרו להיות ריקים...
איך עושים את זה? -
@קינג-קומפיוטריש דרך להרשם בלי SMS? כי בכל ניסיון להתחבר הוא דורש אימות ואין אופציה בלי SMS
-
@OdedDvir אמר באקסל - שליפת נתונים אוטו' לפי תנאי מסויים לטבלה אחרת:
ב-VBA למשל, TRUE מומר לערך 1-
למה?
או יותר נכון מה המשמעות של זה? (מה היה רע ב 1...) -
@NH-LOCAL אמר במסדר ההורדות 5.3 - סקריפט שיבצע סדר בתיקיות שלכם:
ב. אין עניין לפתוח תיקיה לכל הקבצים הלא מוגדרים, כי בשביל זה יש כבר את התיקיה המקורית... כל הרעיון הוא לבצע סדר ולא להעביר את הבלגן למקום אחר.
ג. יש אפשרות להעביר את התיקיות הנותרות לתיקיה בפני עצמה, השאלה מה בדיוק העניין בזה.לי אישית יותר נח שכל הבלגן מרוכז בנפרד מהתיקיות המסודרות... שיהיו לי תיקיות מסודרות ולצידן תיקית בלאגן, ולא שהתיקיות המסודרות יהיו בתוך כל הבלאגן של תיקיית ההורדות.
אבל בהחלט ייתכן שזו העדפה אישית שלי...נ.ב. למיטב ידיעתי קבצי אקסס דוקא כן מוגדרים, אולי תיתן לי סיומת ספציפית
סיומת accdb ו mdb נשארו אצלי בחוץ
תודה רבה בכל זאת, זה באמת רעיון גדול שחוסך הרבה כאב ראש
-
@NH-LOCAL הצעת שיפור קטנה - קבצי accdb וקבצי אקסס בכלל לא מוגדרים בסקריפט, וכן כמה סוגים נוספים של קבצים, (אצלי גיליתי קבצי appxbundle, sketchup ו dat...) אולי כדאי לפתוח תיקייה לכל הקבצים שאינם תחת קטגוריה מסויימת...
כמו"כ האם ישנה דרך להכניס את כל התיקיות האחרות לתוך תיקיית על, זאת אומרת שחוץ מהתיקיות המוגדרות ע"י הסקריפט, כל שאר התיקיות שיש בהורדות ייכנסו לתיקיה בשם 'שאר התיקיות' או משהו בסגנון...
זה אולי קוסמטיקה אבל מהשימוש האישי שלי נראה לי שזה ממש יביא תועלת
תודה רבה! -
@dovid לא, אבל בכותרת הנושא מצויינים שני הנושאים, חשבתי שזה מספיק
-
לאחר הארתו של @OdedDvir כאן כתבתי את השאלות מחדש
-
יש לי טופס שבו צריך להזין לדוגמא מוצר, חנות, וסכום. בטבלה נפרדת מאוחסנים לי המחירים של כל המוצרים בחנויות, ואני מעוניין שאחרי שהזנתי את המוצר והחנות, ערך ברירת המחדל של הסכום יהיה לפי הטבלה הנ"ל. (אני רוצה שהסכום יישאר כנתון בטבלת הקניות ולא בנפרד, כדי שיהיה אפשר לשנות אותו במקרים ספציפיים, ולכן אני לא רוצה להפוך את זה לאוטומטי וממקור נתונים נפרד)
האם ואיך אפשר לעשות זאת? -
במערכת תרומות, רציתי לתת אפשרות לתרום כמה מוצרים על מקרה אחד, ולכן חילקתי את התרומות לשתי טבלאות - טבלת המקרים (עם קוד מקרה, שם המשפחה, פרטי המקרה) וטבלה של אמצעי התרומה (מוצר, חנות, כמות, סכום) כשלכל מקרה יש כמה רשומות באמצעי התרומה (כיון שייתכן לתרום על מקרה של שרפה בבית גם מטבח ב"א.א. מטבחים" וגם ספה ב"א.א. ספות" )
כעת אני רוצה להוציא דוח אחד על כל המקרה שבו יהיה פירוט של כל המוצרים שתרם (כמו קבלה מחנות). השאלה איך ניתן להכניס נתונים מכמה רשומות (של כל המוצרים בתרומה הנוכחית) לתוך דוח אחד (ששייך לתרומה הכוללת)
תודה רבה!
-
-
@אפר-שריפה תודה רבה. אכן במקרה הספציפי הנ"ל אפשר לפתור ע"י חישוב בVBA בלי SQL, ואני עדיין שואל תיאורטית אם יש דרך כזו.
-
כמה שאלות באקסס:
- האם ואיך ניתן להגדיר משתנה ב VBA על בסיס משפט SQL? דוגמא:
if "SELECT Donor.ID, Sum(Donations.Amount) AS SumמתוךAmount FROM Donor LEFT JOIN Donations ON Donor.ID = Donations.DonorID GROUP BY Donor.ID HAVING (((Donor.ID)=[Forms]![frmDonorCard]![ID]));" > 500 then msgBox end if
דהיינו אם סכום התרומות לתורם זה גדול מ500 אז לדוג' תקפוץ הודעה וכו'
עריכה: אחרי תגובתו של @OdedDvir למטה - השאלות האחרות הועברו לנושא נפרד.
-
@OdedDvir ייש"כ על התשובה המדוייקת כהרגלך...
אחרי שניסיתי לעשות כן גיליתי (מה שנכון בכל קריטריון המבוסס על טופס) שאם הקריטריון מגיע מטופס משנה הוא לא נחשב טעון (וממילא א"א להתבסס עליו) - ומכאן הסיבוך כיון שאם אני רוצה לסנן לתאריכים או לכל דבר אחר מטופס משנה לדוג' מטופס ניווט - השאילתא לא תעבוד...
אני מאמין שיש פתרון למצב כזה, אם כי לא הצלחתי למוצאו עדיין
ושוב תודה לכל המגיבים (מקווה שלא הגדשתי את הסאה עם שאלות... -
יש לי טבלה עם נתוני קניות לפי תאריכים, ואני מעוניין ליצור טופס שיהיה ניתן לסכם את הקניות (סכום, כמות לפי מוצר וכדו'), על פי סינון לתאריכים, דהיינו בשדה אחד בטופס תאריך התחלה, ובשדה שני תאריך סיום, ואני רוצה שכל הטווח הזה ייכלל בשאילתה.
ניסיתי לעשות קריטריון כזה...
אבל זה לא הלך כמובן...
אשמח לדעת אם יש דרך לעשות זאתבתודה ענקית מראש
-
@OdedDvir תודה רבה! אני מקווה שבזה יסתיימו השאלות שלי בעניין... אם כי כל פעם כשאני בטוח שהנה סיימתי - צץ לו איזה באג נוסף...
ולגבי הכותרת - כששאלתי לא היה לי סדר בראש לגבי מהות הבעיה, לכן לא כתבתי ככה, אבל הנה - שיניתי. -
-
כשיש דוח שמופק על בסיס נתונים שאני רוצה להזין בטופס, ובאותו טופס כבר עשיתי לחצן ששולח אותו להדפסה, הבעיה שהנתונים עוברים מהטופס לטבלת המקור של הדוח רק בסגירה של הטופס, ואילו אני רוצה לשלוח מיד להדפסה - בלי לסגור את הטופס... אפשרי?
-
נניח שיש לי מערכת לניהול של קופת צדקה (הדוגמה הקלאסית של @OdedDvir ...) וטופס הניווט מבוסס על(שאילתא שמבוססת על) טבלת נתמכים, וכן יש טופס פרטי לכל נתמך, שמכיל גם חישוב של כל התרומות לאותו נתמך, הבעיה שאחרי שאני פותח את הטופס נתמך, אי אפשר לפתוח שוב, הוא מעלה את ההודעה הזו
או זו: (תלוי איך אני פותח כמובן...)
הטבלה לא פתוחה בפועל בשום מקום, הטופס היחיד שפתוח הוא הטופס "נתמכים", ורק אחרי סגירתו אפשר לפתוח שוב.
אני מנסה להבין איפה הבעיה, כי כשהטופס "נתמכים" פתוח ניתן לפתוח גם טופס נתמך בודד, ורק אחרי פתיחת טופס נתמך אחד א"א לפתוח עוד...
(לצערי אני לא יכול להעלות את התוכנה עצמה כיון שהיא מכילה נתונים... מקווה שמספיק מה שכתבתי, ואם לא כן אאלץ למצוא פתרון אחר)
-
-
האם יש דרך כל שהיא לגרום שמיילים שמגיעים אלי מכתובת מסוימת יישלחו מהמייל שלי אוטומטית לרשימת כתובות? (הגדרות בג'ימייל/סקריפט וכדו'?)
-
@OdedDvir כך או כך סביר שהוא מדריך טוב...
הנקודה היא שמדריכים לדוט נט נפוצים יותר ברשת ממדריכים לVBA... ודאי מדריכים ברמה כזו...
בכל אופן תודה רבה!!! -
@OdedDvir ייש"כ על התגובה המפורטת. (ואולי זה הזמן למדריך אקסס למתקדמים...? בהתחשב בכך שרוב מוחלט של הידע שלי בנושא הוא מהמדריך המדהים והמחכים שלך...)
רק חלק אחד עדיין לא הבנתי (ואני רואה שלא פירטתי מספיק בשאלה) בקוד כזה:
Private UserClicked As Long Private Sub MyButton_Click() UserClicked = 1 End Sub
וכאן אני מוסיף עוד לחצן שמגדיר את הערך ל2
Private Sub YourButton_Click() UserClicked = 2 End Sub
וכן הלאה, ואני מעוניין שאם UserClicked = 1 אז X ואם שווה 2 אז Y וכן הלאה, איך אני מגדיר שבלחיצה על כפתור ישתנה הערך רק לצורך ה If.
Private Sub AfterInsert() If (UserClicked = 1) Then MsgBox("I'm sorry, but you must first click the other button.") Else If (UserClicked = 2) Then MsgBox("Great, you're a good boy.") End If End If End Sub
וכן הודעות ל3 וכו'
השאלה אחרי לחיצה במופע מסויים של הטופס, האם הערך לא ייקבע גם למופעים הבאים, למשל אם כעת הערך הוא 3, ובמופע הבא אני מעוניין שהוא יחזור אוטומטית לערך הראשון (כיון שהלחצנים הם לשינויים ספציפיים בטופס ולא לברירת מחדל)
מקווה שהצלחתי להסביר... (אני לא מכיר את הטרמינולוגיה בכלל ) -
@ארי תודה אבל לא זה מה ששאלתי...
אני מעוניין שהלחצן יגדיר את ערך המשתנה ל 2 וממילא לאחר לחיצה על הלחצן בטופס זה יחול התהליך שהגדרתי אם Yossi = 2
בעצם השאלה היא איך לקשר את החלק הזה>Private Sub לחצן1_Click() Me.BlaBla.Form.AllowAdditions = True End Sub
לשאר הקוד, וכן איך להגדיר שהלחיצה תשנה את המשתנה רק ביחס לחישוב הנוכחי (כיון שגם ההגדרות של הלחיצות על לחצנים אחרים משנות את ערך המשתנה והקוד צריך לדלג עליהם...)
-
האם ואיך ניתן להכניס תפקידים של לחצנים (בטופס) כחלק מקוד ארוך יותר?
כלומר, כשכותבים קוד ללחצן זה נמצא בתוך Private Sub, ואילו אני רוצה שלמשל לחצן מסויים יגדיר משתנה כX, בתוך קוד ארוך יותר, לדוג'Private Sub Current_Form() Dim Yossi as String Yossi = 1
ואז
Private Sub לחצן1_Click() Yossi = 2 If Yossi = 1 Then Me.Current_Form.AllowAdditions = True Else ……… End Sub
(כמובן שזו רק דוגמא ויש כאן הרבה שגיאות קוד, אז נא לא להעיר על זה...)
ליתר ביאור - אני מנסה ליצור טופס לצורך פירוט על תמיכות בקופת צדקה (בערך...) ואני מעוניין שיהיה אפשר לבחור סוג מקרה כדי להתאים נוסח אוטומטי לפרוטוקול, ועל פי סוג המקרה יהיו שינויים נוספים אוטומטיים בטופס.
לכן אני מנסה ליצור כמה לחצנים שתפקידם יהיה רק להגדיר את המשתנה, ולתלות את כל השינויים באותו משתנה.
(ייתכן מאד שאני עושה סתם סיבובים מיותרים, תסלחו לי כי זה הקוד הראשון פחות או יותר שאני מנסה...
אקסס: ניקוי טופס מכל הרשומות
אקסס: ניקוי טופס מכל הרשומות
אקסס: ניקוי טופס מכל הרשומות
התרשמות קלה ממודל DALL E 2 של Open Ai
אקסל - שליפת נתונים אוטו' לפי תנאי מסויים לטבלה אחרת
מסדר ההורדות 6.1 - סקריפט שיבצע סדר בתיקיות שלכם
מסדר ההורדות 6.1 - סקריפט שיבצע סדר בתיקיות שלכם
אקסס: ערכי ברירת מחדל ע"פ טבלה, ודוח עם כמה רשומות
אקסס: ערכי ברירת מחדל ע"פ טבלה, ודוח עם כמה רשומות
שימוש במשפט SQL כמשתנה בקוד, ושאלות על טפסים באקסס
שימוש במשפט SQL כמשתנה בקוד, ושאלות על טפסים באקסס
סינון לטווח תאריכים באקסס
סינון לטווח תאריכים באקסס
אקסס: שמירת הנתונים בטופס לפני פתיחת דוח. ונעילת רשומות.
אקסס: שמירת הנתונים בטופס לפני פתיחת דוח. ונעילת רשומות.
הפניית מייל לכתובות נוספות
עזרה לקוד באקסס
עזרה לקוד באקסס
עזרה לקוד באקסס
עזרה לקוד באקסס