דילוג לתוכן

עזרה הדדית - VBA word

29 נושאים 194 פוסטים
  • בעיה | בעיה בהגדרת הפקודה: font.position

    לא נפתר
    8
    0 הצבעות
    8 פוסטים
    41 צפיות
    P

    @שלמה11 כתב בבעיה | בעיה בהגדרת הפקודה: font.position:

    גם גודל טקסט הוא לפי נקודות

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

    https://learn.microsoft.com/en-us/office/vba/api/word.font.position
    https://learn.microsoft.com/en-us/office/vba/api/word.font.size

    🤷‍♂️ אין לי עצה.

  • עזרה | שחזור טקס במסמך וורד

    נפתר
    10
    0 הצבעות
    10 פוסטים
    143 צפיות
    es0583292679E

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

    "עימודית" אינה תלויה בהרצת מאקרו כלל, ואינה מפעילה מאקרו בזמן השימוש. יש מספר פעולות נקודתיות שדורשות גישה לעריכת קובץ ה-XML של תבנית Word (Normal.dotm), אך הדבר אינו שקול להרצת מאקרו בשום צורה, ואינו צורך משאבים או סוללה מעבר לפעולת העריכה עצמה.

    הטענה שפקודות מאקרו אחראיות לצריכת 88% מהסוללה – פשוט לא אפשרית!

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

    פקודות VBA מאוחסנות בקובץ Normal.dotm של Word. הדרך היחידה "לבטל" קוד VBA היא למחוק אותו ידנית או לאפס את הקובץ הזה.
    אם "עימודית" לא פעילה, היא פשוט לא עושה כלום – היא לא "מחזירה" סוללה, כי היא לא זו שלקחה אותה מלכתחילה.
    בקיצור, התיאוריה שהוצגה כאן לא רק לא נכונה – היא בלתי אפשרית מבחינה טכנית! אין קשר בין מה שנאמר לבין אופן הפעולה של Word, מאקרו, או "עימודית".

    לכן, כדאי להימנע מהסקת מסקנות לא מבוססות ולהתמקד בבדיקה אמיתית של מקור הבעיה. אם אתה חווה צריכת סוללה חריגה ב-Word, יש הרבה דברים לבדוק – אבל מאקרו אינם אחד מהם.

    הוספה:

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

    מאקרו הוא קוד פתוח לחלוטין – כל פקודת VBA שנכתבת ב-Word גלויה לעין ונמצאת ב-Visual Basic בתוך Word עצמו. אין שום "ריצה ברקע", אין שום פעילות סמויה, ואין שום דרך שבה קוד המאקרו יכול לפעול מבלי שאתה מפעיל אותו באופן ישיר.

    אם יש חשש למשהו חשוד – אפשר לבדוק!

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

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

  • בקשת מידע | איך מוסיפים מספר לכל הספרות שנמצאות בקובץ וורד?

    נפתר
    16
    0 הצבעות
    16 פוסטים
    262 צפיות
    menajemmendelM

    @אלף-שין כתב בבקשת מידע | איך מוסיפים מספר לכל הספרות שנמצאות בקובץ וורד?:

    @menajemmendel כתב בבקשת מידע | איך מוסיפים מספר לכל הספרות שנמצאות בקובץ וורד?:

    באדיבות ''עבודת נמלים בוורד'' הבית שלך לאוטומציה במסמכים

    תודה על כל העזרה!
    אסמן כנפתר!
    אגב אם הבנתי נכון באתר הזה נראה שזה לא תוכנה לרכישה אלא עבודת עימוד?.

    יש שתי שירותים נפרדים שאין קשר בין אחד לשני:

    שירותי עימוד ספרים למי שרוצה. (וזה עימוד ''מאיר עיני חכמים'' כמו שאתה רואה בפרופיל שלי). בנוסף (בלי קשר לעימוד) למיקרים כאלה שאנשים צריכים עבודות שחוזורת על עצמם הרבה וכוד', שלעשות אותם באופן ידני לוקח מלא מלא זמן, אז יש את השירות של ''עבודת נמלים בוורד'' שיעשה עבורך את העבודה הנצרכת, ויחזיר לך מסמך מתוקן (כמובן אם לא הצלחתי לעשות את מה שרצית אין צורך לשלם כלום, ברור).
  • 3 הצבעות
    7 פוסטים
    153 צפיות
    P

    עלה לי רעיון:
    על ידי זיהוי גודל לא זהה מצו"ב

    Private Sub SizeReplacements() Dim defaultSize As Integer, currentSize As Integer, diff As Integer, i As Integer Set normalStyle = ActiveDocument.Styles(wdStyleNormal) ' קבלת גודל הפונט ברירת המחדל defaultSize = normalStyle.Font.SizeBi ' שלב 1: סימון גודל הפונט ברירת המחדל With ActiveDocument.Content.Find .style = normalStyle .Format = True .Font.SizeBi = defaultSize .Replacement.text = "»^&«" .Execute Replace:=wdReplaceAll End With ' שלב 2: הוספת תגיות מותאמות לגודל Selection.GoTo What:=wdGoToPage, Which:=wdGoToAbsolute, Count:=1 With Selection.Find .style = normalStyle .Format = True .ClearFormatting .text = "«[!»^13]{1,}" .Forward = True .Wrap = wdFindStop .MatchWildcards = True Do While .Execute Call Trim If Selection.style = normalStyle Then 'זיהוי טווח עם גדלים שונים If Selection.Font.SizeBi = 9999999 Then Call DivideTextByFontSize GoTo nxt End If 'זיהוי טקסט גדול\קטן currentSize = Selection.Font.SizeBi If currentSize > defaultSize Then 'סימון טקסט גדול diff = currentSize - defaultSize For i = 1 To diff Selection.InsertBefore "<big>" Selection.InsertAfter "</big>" Next i ElseIf currentSize < defaultSize Then 'סימון טקסט קטן diff = defaultSize - currentSize For i = 1 To diff Selection.InsertBefore "<small>" Selection.InsertAfter "</small>" Next i End If End If Selection.Collapse (wdCollapseEnd) nxt: Loop End With ' שלב 3: הסרת המהדורים With ActiveDocument.Content.Find .text = "[»«]" .MatchWildcards = True .Replacement.text = "" .Execute Replace:=wdReplaceAll End With End Sub Private Sub DivideTextByFontSize() With Selection Do While .Font.SizeBi = 9999999 .MoveEnd wdCharacter, -1 Loop .InsertAfter "»«" .MoveStart wdWord, -1 .Collapse (wdCollapseStart) End With End Sub
  • 0 הצבעות
    2 פוסטים
    72 צפיות
    י

    @pcinfogmach מה אתה מגדיר כמסמכים מורכבים?
    טורים עם מקטעים שונים וכותרות זה מספיק מורכב?

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

    בכל אופן, תודה! באמת הגיע הזמן למשהו כזה שיעשה עבודה מקצועית על כל הטורים האפשריים...

  • שאלה | הכנסת הערת שוליים בגוף הטקסט

    נפתר
    3
    0 הצבעות
    3 פוסטים
    154 צפיות
    א

    האם מישהו יכול להפוך את זה למאקרו סגור ומוכן?

  • עזרה | קוד VBA בוורד להוספת פקד טקסט לטבלה

    2
    0 הצבעות
    2 פוסטים
    38 צפיות
    מגדליםמ

    לתועלת הענין העלה לכאן את הקוד הקיים וכך יוקל לעזור.

  • בקשת מידע | עזרה בוורד ב'החלפה' - מאקרו VBA

    הועבר נפתר
    25
    0 הצבעות
    25 פוסטים
    297 צפיות
    S

    @יוסף-בן-חיים כתב בהסבר | עזרה בורד ב'החלפה':

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

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

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

  • בקשת מידע | יצירת מאקרו להערת סקירה בWORD 365

    7
    0 הצבעות
    7 פוסטים
    155 צפיות
    1

    @106 כתב בבקשת מידע | יצירת מאקרו להערת סקירה בWORD 365:

    כנראה זה אבוד.

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

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

    @מניין

  • עזרה | עזרה בכתיבת פקודות מאקרו שונות

    הועבר
    8
    0 הצבעות
    8 פוסטים
    145 צפיות
    ד

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

  • בקשת מידע | יצירת קובץ VSTO

    8
    0 הצבעות
    8 פוסטים
    192 צפיות
    P

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

  • 2 הצבעות
    3 פוסטים
    90 צפיות
    P

    @menajemmendel
    אם הוא רוצה שזה יקרה לכל צבע אתה צודק

  • נושא זה נמחק!

    נפתר
    1
    0 הצבעות
    1 פוסטים
    4 צפיות
    אין תגובות
  • 8 הצבעות
    17 פוסטים
    478 צפיות
    P

    @האדם-החושב כתב בשיתוף | ידיעה חשובה VBA: ביטול פעולה אחרונה למאקרו שלם כיחידה אחת:

    אולי צריך להוסיף את זה לתוך המאקרו שביוזר פורם עצמו?

    כן

  • עזרה | עזרה ליצירת מאקרו להוספת מעבר מקטע

    3
    0 הצבעות
    3 פוסטים
    45 צפיות
    M

    @פלורידה אני צריך את התו הזה כדי להחליף אותו אח"כ בעיטור

  • בקשה | פתיחת ספרים מהיברו בוקס ואוצר החכמה דרך וורד

    6
    3 הצבעות
    6 פוסטים
    219 צפיות
    האדם החושבה

    @menajemmendel בהיברו בוקס בהורדת קובץ כן, בשאר הדברים שהוא יפתח את הלינק בדפדפן או בתוכנת אוצר החכמה

    @menajemmendel כתב בבקשה | פתיחת ספרים מהיברו בוקס ואוצר החכמה דרך וורד:

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

    נכון, יש עמודה שמכילה לינק ישיר להורדה ושאר העמודות הם לצפייה בדפדפן

  • 0 הצבעות
    8 פוסטים
    131 צפיות
    האדם החושבה

    @121244 נראה לי שכך:

    %userprofile%

    כלומר:

    %userprofile%\documents\gibuy

    עריכה: עכשיו אני רואה בתורת אמת בוורד משהו כזה:

    Dim xfilepath As String xfilepath = Environ("USERPROFILE") & "\Documents\ToratEmetInstall\WordAddon\Index\BookPathIndex.txt"
  • באג | כל הפקדות מאפקרו שבNORMAL לא עובדים לו

    2
    0 הצבעות
    2 פוסטים
    41 צפיות
    P

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

  • בקשה | קוד vba להצרת אות ולהרחבת אות

    16
    0 הצבעות
    16 פוסטים
    488 צפיות
    1

    @pcinfogmach הגופן פרן ריקול

  • מדריך | מדריך איך למנוע מסך לבן מפקודות מאקרו ארוכות: VBA

    2
    7 הצבעות
    2 פוסטים
    130 צפיות
    אין תגובות