https://pilotmoon.com/popclip
תוכנה חמודה (לא עונה על כל הדרישות) אבל בתשלום חד פעמי

הדגמה:
41120f58-4a20-4c59-844f-b9387efe786c-CleanShot 2022-08-12 at 11.02.20.gif

קראתי שוב את השאלה של השואל. ואכן כנראה לא הבנתי נכון את השאלה.

והתשובה שזה אכן אפשרי

צריך לפתוח בכרטיסיית "הפניות" וללחוץ על החץ הפצפון של הערות שוליים

aba5e8ce-0e84-49a0-b3e0-f3cfa558407a-image.png

להגדיר שתי עמודות.

3cfc01b4-2fc2-4fd1-9712-d832661148cc-image.png

בהצלחה.

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

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

תגיד אנחנו בכלל חיים על אותו פלנטה? איפה דבר כזה מקובל?

@אוריי האם התשובה של @OdedDvir עונה על הבעיה השנייה גם כן?

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

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

@liy770 אני לא מבין את השאלה, תוכל להרחיב יותר למה vuetify מפריע פה לעסק?
איך היית עושה בלעדיו?

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

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

וכמאמר החכם: אין חכם כבעל הנסיון!!

וואו תודה רבה לכולכם. הצלתם אותי! וגם למדתי מזה דבר או שניים..

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

@Y-Excel-Access ממש תודה

@Benji כרגע הוא לא עובד
יש צורך לתרגם את הגרסה העדכנית מחדש

@חצקל הניסיון שלי הוא שgmail מבצע סריקה לפי תדירות ההודעות שמתקבלות.

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

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

@OdedDvir
יש לך תבנית אקסס של דוחות נוכחות ?

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

נ.ב אתה יכול בכיף להשתמש ברעיונות שכתבתי, לשם כך נכתבו..

@סקרן-0 אמר באקסס: ערכי ברירת מחדל ע"פ טבלה, ודוח עם כמה רשומות:

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

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

if nz(me.Store.value,"") <>"" AND nz(me.Item.value,"") <>"" then me.Price = Nz(Dlookup("Price" , "Prices", "Store=" & me.Store.value & " AND Item=" & me.Item.value),0) End if

כמובן אם החנות ו/או המוצר הם טקסט צריך להוסיף , לפני ואחרי

if nz(me.Store.value,"") <>"" AND nz(me.Item.value,"") <>"" then me.Price = Nz(Dlookup("Price" , "Prices", "Store='" & me.Store.value & "' AND Item='" & me.Item.value & "'"),0) End if

@סקרן-0 אמר באקסס: ערכי ברירת מחדל ע"פ טבלה, ודוח עם כמה רשומות:

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

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

בהצלחה.

@סקרן-0 לשאלתך הראשונה:

האם ואיך ניתן להגדיר משתנה ב VBA על בסיס משפט SQL?

משפט SQL באקסס לא מחזיר ערך. הוא פשוט הוראה לבסיס הנתונים לבצע שאילתה מסויימת.
שמא כוונתך לשאול: האם ניתן לשלוף ערך מסויים מתוך שאילתא\משפט SQL?
התשובה הקצרה היא כן. השאלה היא מה המשתנה אמור להכיל? תוצאה של שדה מסויים? סכום של עמודה מסויימת? מספר הרשומות? לכל מקרה יש אופן ביצוע אחר. לחלק יש כבר פונקציות מובנות באקסס, כמו DSum שציין @אפר-שריפה.

באופן כללי, אם אתה מבקש לקבל שדה מסויים בשאילתא, אפשר להשתמש באובייקט RecordSet, כמו שציין יפה @אפר-שריפה.

מובן שעליך לוודא שהשאילתא מחזירה רק רשומה אחת, אחרת לא ברור מאיזו רשומה יאוחזר הערך.

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

Public Function GetFieldFromSQL(SQL As String, fieldName As String) As Variant Dim rs As DAO.Recordset Dim result As Variant Set rs = CurrentDb.OpenRecordset(SQL, dbOpenSnapshot, dbReadOnly) result = Null If Not rs.EOF Then result = rs.Fields(fieldName).Value rs.Close GetFieldFromSQL = result End Function

לדוגמא (על פי המדריך למערכת תורמים):

Dim SQL As String SQL = "SELECT FullName FROM qryDonor_FullName WHERE ID=2" Debug.Print GetFieldFromSQL(SQL, "FullName")

תודפס התוצאה:

לוי יצחק

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

@צדיק-תמים אמר בכיווניות שעון אנלוגי בשורה העליונה (menu ber) ב-MacOS:

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

אני לא דובר אנגלית שוטפת וגם לא יודע ב 100% ובכ״ז אני מעדיף לשים את ה Mac על אנגלית (אחרי כמעט שנה שהוא על עברית) מתרגלים לזה מהר וזה פותר הרבה בעיות...