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

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

@פלורידה עכשיו אני כן מנחש מה אתה זומם...
תוכל לקבל את הטווח על ידי selectedArea.Address

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

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

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

@בערל אני לא מבין את התחביר של השאילתא:

SELECT qrySelect_currentID.Data.ID, qrySelect_currentID.Data.FirstName, qrySelect_currentID.Data.LastName, INTO MailMerge
FROM qrySelect_currentID;

1. איך יתכן שתי נקודות בשם שדה qrySelect_currentID.Data.ID, האם אתה משתמש בשדה עם ערכים מרובים?
2. אחרי LastName יש פסיק מיותר

@בערל אמר בהדפסת ד''וח מאקסס על בסיס קובץ וורד:

ואז אעשה שאילתא חדשה שתביא לי רק את השורה האחרונה מהטבלה, (איך? ע''י בחירת ה-ID הגבוה ביותר?

זה כנראה הכי פשוט. שאילתת קיבוץ עם הפונקציה Max על השדה ID.

@בערל אמר בהדפסת ד''וח מאקסס על בסיס קובץ וורד:

תוכל להסביר על זה?

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

אני צריך קודם לבצע את המיזוג דואר בוורד או שהקוד כבר קובע?

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

מה הכוונה Bookmarks? איך הוא יודע למה אני מתכווין?

הוא לא באמת יודע, פשוט מי שהכין את הוורד נתן שם לסימניה שיעזור לו לזהות איזה שדה להכניס לסימנייה. למשל לסימנייה Bookmarks("Title") הוא מכניס את הערך של השדה Title בטופס.

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

מדבריך:

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

אני מבין שאתה אוחז בשלב ג?

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

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

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

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

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

ולגבי מה שכתבת לעיל:

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

עובד מצוין:

מסתמא יש לך טעות כלשהי. פרט מה עשית ונראה מה הבעיה.

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

הערכים האפשריים עבורו הם True=כן, False=לא, או Null=כלום\לא ידוע.

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

@פלורידה אמר באקסל | פתיחת קובץ במסך מלא כברירת מחדל:

הערה: הקוד עובד רק אם הוא הראשון בחוברת.

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

@שוהם307 בקוד שהבאתי, row הוא שם של משתנה (אובייקט) שמחזיק את הערך של השורה הנוכחית.
בשורה 11 אני יוצר אותו ונותן לו ערך על ידי הפקודה:

    var row = sheet.getActiveCell().getRow();

@שוהם307 אמר בגוגל שיטס | העברת שורות לגיליון אחר:

האם יש אפשרות לשדרג את הקוד, שאחרי שהוא מעתיק את השורה לארכיון, שימחק את השורה המקורית?

כן, פשוט תוסיף את השורה הבאה מיד אחרי שורה 23:

      sheet.deleteRow(row);

@פלורידה לגבי 1, להלן קיצורים מתוך הממשק של התוכנה:
Ctrl+F1 סוגר\פותח תצוגת כרטיסיות.
Ctrl+Shift+F1 סוגר\פותח תצוגת מסך מלא.

לגבי 2, מה הכוונה ההסתר הרגיל? מה אתה רוצה שלא יראו?

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

אני צריך את זה לפקודות שיחולו על כל טבלה באשר היא

כיצד יחולו הפקודות, על ידי VBA? אם כן, תוכל לבחור את הטווח על ידי הפונקציה Range.
לדוגמא, כדי לסמן את העמודות B עד E תשתמש בפקודה הבאה:

Range("B:E").Select

גם כאן מחליפים שני תוים בהתחלה, דהיינו U+1F50D יהפוך ל H1F50D&.
עריכה: כאן לפעמים הפונקציה ChrW לא תעבוד. הסבר לקמן.