פקודות מאקרו בוורד

[חנון המרבה]

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

[yossiz]

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

אתה טוען שאצלך זה שונה?

@חנון-המרבה אמר בפקודות מאקרו בוורד:

וכנ"ל ביישור

אצלי זה לא מקליט בכלל יישור תמונה. בטוח שזה הקליט?

[חוות דעת]

@אלישי אמר בפקודות מאקרו בוורד:

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

הקישור הראשון חסום בנטפרי!

[חנון המרבה]

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

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

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

[yossiz]

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

אתה רוצה להעלות קובץ לדוגמא, וקוד ה-VBA של המאקרו ולפי"ז נראה מי צודק?

[yossiz]

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

    With Selection.Find.Replacement.Font
        .Size = 8
        .Bold = True
    End With

תוסיף כך:

    With Selection.Find.Replacement.Font
        .Size = 8
        .Bold = True
        .SizeBi = 8
        .BoldBi = True
    End With

והעיצוב יחול גם על טקסט ימין לשמאל

[חנון המרבה]

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

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

הקוד ה-VBA של המאקרו אינו כרגע תח"י..

[yossiz]

@חנון-המרבה בלי שתעלה דוגמא אני לא יכול לבדוק אבל נסיתי עכשיו לעשות בדיוק מה שאתה עושה, דהיינו

• העתקה מאקסל לוורד
• הקלטה של מאקרו שיהפוך אותו מטבלה לטקסט רגיל והחלפת העיצוב של מספרים

וזה עובד בהרצת המאקרו בדיוק כמו בשעת הקלטה.

@חנון-המרבה אמר בפקודות מאקרו בוורד:

ממה נפשך זה אמור לעבוד במאקרו אם זה עבד בהקלטה, לא?!

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

[חנון המרבה]

@yossiz מסתבר...

כנ"ל הקוד ה-VBA של המאקרו אינו כרגע תח"י וכשיהיה לי את זה אני יעלה את זה לפה..
תודה..

[אלישי]

@yossiz אמר בפקודות מאקרו בוורד:

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

בדוק ומנוסה.