מדריך | מדריך - איך להכין תוסף לוורד בקלות

[pcinfogmach]

קודים נוספים

1. קוד בשביל כפתור תיבת דו-שיח

 <group id="customGroup" label="Custom Group">
   <dialogBoxLauncher>
     <button id="button" screentip="Dialog Box Launcher" />
   </dialogBoxLauncher>
 </group>

הפקודה screentip פירושה התיבה שתופיע על ידי ריחוף הסמן מעל הכפתור בלי ללחוץ. (פקודה זו עובדת בכל כפתור שהוא אבל כאן היא נצרכת מאוד).

את שאר הקוד יש לעשות כמו כל כפתור.

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

2. כפתור לאחד מהפקודות הרגילות של אופיס (כגון הדבק לדוגמא, או פתיחת חלון הסגנונות)

<button idMso="Cut" />\

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

<control idMso="BreaksGallery"/>

הערה: יש להשתמש עם אותיות רישיות כמו שהם מופיעים במקור אחרת זה לא יעבוד

3. עיצוב הכיתוב שעל הכפתור
   

label="Button"
description="This is a verbose description that describes
     the function of this control in detail."

פקודת label מגדירה את הכותרת ופקודת description מגדירה את הכיתוב.

4. עיצוב התיבה שמופיעה על ידי ריחוף

screentip="כותרת" 
 supertip= "מלל מלל מלל מלל"

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

5. מעבר שורה ידני בטקסט

---

מקורות נוספים:

קודים נוספים תוכלו לראות בתוך התוכנה עצמה על ידי פתיחת התבנית בתוכנה ולחיצה על insert

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

קוד מעניין עבור יצירת תפריט רשימה תוכלו לראות בגירסה מס' 2 של התוסף החדש לוורד כאן מקור הקוד הוא מכאן שם תוכלו למצוא קודים נוספים- מצו"ב התבניות מהמקור הנ"ל. customize_ribbon_main_examples.zip

עדכון:
מצאתי תבנית שעובדת בשיטה קצת שונה כאן. לינק ישיר להורדת התבנית לחץ כאן.
באתר זה קיים גם קורס מלא בנושא (באנגלית) + תבנית מלאה עם כל סוגי הלחצנים - בתשלום למי שמעוניין בכך כאן.

תבנית נוספת מצאתי כאן ויש שם גם כתבות מלאות על הנושא

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

ועוד שני כתבות שימושיות
https://www.contextures.com/excelribbonmacrostab.html
https://www.contextures.com/excelribbonaddcustomtab.html

מסמך להורדה למחשב
https://interoperability.blob.core.windows.net/files/MS-CUSTOMUI/[MS-CUSTOMUI].pdf?&~nfopt(fileDistorted=22159770024873704)

[menajemmendel]

פוסט זה נמחק!

[menajemmendel]

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

[pcinfogmach]

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

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

[menajemmendel]

@pcinfogmach
כן ככה ידעתי שאפשר לעשות, אבל חשבתי אם יש אופן ישיר שהעורך יקרה לפעולה עצמה ולא לעשות מאקרוים מיותרים

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

ב. בVBA ראיתי שאפשר למחוק את השורות שקשורות לCASE דהיינו במקום
במקום

Sub smallbutton1(ByVal control As IRibbonControl)
Select Case control.id
  Case Is = "smallbutton1"
    Macros.macro1
End Select
End Sub

אפשר לכתבו רק

Sub smallbutton1(ByVal control As IRibbonControl)
    Macros.macro1
End Sub

בינתיים לא ראיתי שום בעיה בילעדיהם, אבל אולי אני טועה

ג. מה שכתבת וכן הOPTION EXPLICIT ו ''לא לגעת'' אכן ברוב חוצפתי נגעתי ומחקתי אותו ועובד כרגיל

Option Explicit
Public myRibbon As IRibbonUI
Sub Onload(ribbon As IRibbonUI)
'המאקרו הזה יוצר את סרגל הכלים - לא לגעת
Set myRibbon = ribbon
End Sub

תודה רבה

[pcinfogmach]

@menajemmendel תודה רבה על ההערות המחכימות רק נוסיף כמה הבהרות

@menajemmendel כתב במדריך | מדריך - איך להכין תוסף לוורד בקלות:

בעורך אפשר לכתוב כל הפרטים ששייכים לאותו כפתור באותו שורה,

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

@menajemmendel כתב במדריך | מדריך - איך להכין תוסף לוורד בקלות:

ב. בVBA ראיתי שאפשר למחוק את השורות שקשורות לCASE דהיינו במקום

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

@menajemmendel כתב במדריך | מדריך - איך להכין תוסף לוורד בקלות:

מה שכתבת וכן הOPTION EXPLICIT ו ''לא לגעת'' אכן ברוב חוצפתי נגעתי ומחקתי אותו ועובד כרגיל

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

[pcinfogmach]

@menajemmendel כתב במדריך | מדריך - איך להכין תוסף לוורד בקלות:

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

הנה:

<button idMso="Cut" />\

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

יש הרבה כפתורים שהקוד בהם הוא קצת שונה

<control idMso="BreaksGallery"/>

[menajemmendel]

@pcinfogmach כתב במדריך | מדריך - איך להכין תוסף לוורד בקלות:

cut" זהו הקוד בשביל הכפתור "גזור", יש להחליף לפי השם שמופיע על הכפתור על ידי ריחוף מעליו עם סמן העכבר

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

[מאקרו]

@menajemmendel אפשר בתפריט של הוספת פריטים לרצועת הכלים לראות את השם באנגלית ע"י ריחוף.

[menajemmendel]

@מאקרו תודה

[pcinfogmach]

@menajemmendel
לגבי הקוד עבור כפתורים מובנים עכשיו ראיתי ש יש הרבה כפתורים שהקוד בהם הוא קצת שונה

<control idMso="BreaksGallery"/>

[menajemmendel]

@pcinfogmach ואיך יודעים מתי buton ומתי control?

[pcinfogmach]

@menajemmendel
על פי רוב זה control אם זה לא עובד תנסה את button
רצלי וורד נותן התראת שגיאה אם השתמשתי בפקודה הלא נכונה כשאני פותח את התבנית

[pcinfogmach]

@pcinfogmach
עריכה: הכנתי לכם תבנית חדשה שמתאימה גם לגירסאות חדשות יותר של וורד
עריכה2: עכשיו התבנית גם מכיל בתוכו את המדריך
תבנית חדשה.zip