דילוג לתוכן
  • חוקי הפורום
  • פופולרי
  • לא נפתר
  • משתמשים
  • חיפוש גוגל בפורום
  • צור קשר
עיצובים
  • Light
  • Cerulean
  • Cosmo
  • Flatly
  • Journal
  • Litera
  • Lumen
  • Lux
  • Materia
  • Minty
  • Morph
  • Pulse
  • Sandstone
  • Simplex
  • Sketchy
  • Spacelab
  • United
  • Yeti
  • Zephyr
  • Dark
  • Cyborg
  • Darkly
  • Quartz
  • Slate
  • Solar
  • Superhero
  • Vapor

  • ברירת מחדל (ללא עיצוב (ברירת מחדל))
  • ללא עיצוב (ברירת מחדל)
כיווץ
מתמחים טופ
מ

מאקרו

@מאקרו
אודות
פוסטים
147
נושאים
4
שיתופים
0
קבוצות
1
עוקבים
4
עוקב אחרי
4

פוסטים

פוסטים אחרונים הגבוה ביותר שנוי במחלוקת

  • להורדה | תוסף הגהה ועריכה לוורד
    מ מאקרו

    aa4c9569-c7f8-4f13-92fd-3ab6673469cb-image.png
    התוסף נותן אפשרויות מתקדמות להקפת הטקסט או המילים שנבחרו בסוגריים או מירכאות, תוך הגדרה אישית של סימוני הפיסוק שיוקפו.

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

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

    בגירסה זו:
    תוקן הבאג בנתיב ההתקנה שהיה אצל חלק מהמשתמשים.
    סודר העמוד של העזרה בתיבת הדו שיח של התוסף.


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

    עזרה הדדית - וורד

  • בירור | קוד מאקרו ליישור שני טורים בוורד
    מ מאקרו

    @שמעלקא-0 כתב בבירור | קוד מאקרו ליישור שני טורים בוורד:

    ג. האם יש פונקציה פשוטה שמחזירה את מספר הפיסקה שלי.

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

    Function ParagraphNum(aRange As Range)
        Dim MyRange As Range
        Set MyRange = ActiveDocument.Range(ActiveDocument.Range.Start, aRange.Start)
        ParagraphNum = MyRange.Paragraphs.Count
    End Function
    
    

    דוגמא לשימוש בקוד:

    MsgBox ParagraphNum(Selection.Range)
    
    
    עזרה הדדית - וורד

  • בירור | האם אפשר לעשות עימוד לספר תורני עם publisher של אופיס
    מ מאקרו

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

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

    עזרה הדדית - תוכנות גרפיקה ועיצוב

  • בקשה | שליטה על הגופנים בוורד
    מ מאקרו

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

    selection.font.name = "david"
    

    ואז אפשר להצמיד את הפקודה לסרגל הכלים היכן שרוצים.

    עזרה הדדית - מחשבים וטכנולוגיה

  • מדריך | הוראות לעימוד בתוכנת Publisher פרק ג'
    מ מאקרו

    @ginyes מצורף כאן בPDF למעוניינים.
    הוראות לעימוד בפבלישר-פרק ג.pdf
    @MNM תודה על המדריך המושקע!!!

    עזרה הדדית - תוכנות גרפיקה ועיצוב

  • שיתוף | שדה חילופי למספור בוורד ללא באגים
    מ מאקרו

    כהמשך למה שהעליתי כאן ובקשותיהם של החברים, אני משתף מסמך וורד המכיל שדה משוכלל עבור מספרי עמודים ללא באג שצג עם לשון נקיה וכמעט ללא הגבלת שימוש (אפשרות ליותר מ-10,000).
    החידוש כאן הוא שהמספור מגיע גם בסגנון של צמצום אלפים כגון "ה' תשפה" וכדו'
    וגם שדה כנ"ל עבור שדה מספור רציף, שימושי להערות שוליים או זרמים נוספים בתוך תיבות טקסט.
    כמו כן נוסף טריק שמאפשר לקצר את אורך השדה ע"י שדה AUTOTEXT למשהו ממש מינימלי שלא משבש את כל המסמך כאשר עוברים למצב של הצג קודי שדה.
    הסבר בקצרה, כל הפרטים בתוך הקובץ המצורף:
    מסמנים את השדה הרצוי מתוך השדות המצורפים.
    לוחצים על הוספה-> חלקים מהירים-> שמירת הקטע הנבחר בגלריית החלקים המהירים.
    שומרים במקום שרוצים ובשם שבוחרים.
    כעת בכל פעם שתרצו להוסיף שדה מספר עמוד או מספור רציף, תבחרו בשדה AUTOTEXT ותכניסו את הטקסט האוטומטי ששמרתם מתוך הרשימה.

    תיקון לבאג שצג באמצעות שדות.dotx

    עזרה הדדית - וורד

  • בירור | האם אפשר לעשות עימוד לספר תורני עם publisher של אופיס
    מ מאקרו

    @MNM כתב בבירור | האם אפשר לעשות עימוד לספר תורני עם publisher של אופיס:

    אם אתה לא מעמד רב טקסט אתה יכול לייבא את הטקסט מקובץ RTF ואז הוא משרשר לבד.

    אולי אני יחדש לך כעת משהו.
    ניסיתי את מה שאמרת וזה באמת עובד מצוין, כמו כן אופציית העריכה בוורד מאד יעילה להמון מקרים שצריך אופציות עריכה הקיימות בוורד, אבל יש לי 2 תוספות -
    א. אפשר לייבא גם קובץ docx של וורד ולאו דווקא RTF, לא יודע איך אתה עושה אבל אני לחצתי על הוספה-הוסף קובץ.
    ב. יותר מזה, אם תעצב עמוד עם כמה תיבות טקסט עבור כמה זרמים ואח"כ תכפיל אותו עם כל התיבות טקסט שבו, כשאתה מייבא קובץ לתוך התיבה הראשונה זה משורשר לכל התיבות טקסט הזהות בשאר העמודים, ומה שתייבא לתיבה השניה ישורשר ג"כ בהתאם, וא"כ זה מתאים גם לרב טקסט.
    מצורף המחשה הזרמת טקסטים.rar

    עזרה הדדית - תוכנות גרפיקה ועיצוב

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

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

    מדריכים - VBA word

  • שיתוף | טיפים למאקרו בוורד
    מ מאקרו

    @תודה-רבה-4 אמר בשיתוף | טיפים למאקרו בוורד:

    אם רוצים 2 פעמים, צריך לכתוב 3, וכן הלאה

    אם כותבים בשורה 1 RakTora = 0 אז הקוד יחזור לפי מספר הפעמים שתכתוב בשורה 2 ולא צריך לכתוב 1 יותר.

    עזרה הדדית - עימוד

  • בירור | קוד מאקרו ליישור שני טורים בוורד
    מ מאקרו

    @אבי-0

    Selection.ParagraphFormat.SpaceAfter = Selection.ParagraphFormat.SpaceAfter + 1
    
    
    עזרה הדדית - וורד

  • שיתוף | תגובות ל - אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות
    מ מאקרו

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

    עזרה הדדית - וורד

  • בקשת מידע | עמודים ב. ב:
    מ מאקרו

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

    עזרה הדדית - וורד

  • להורדה| תוסף גופנים
    מ מאקרו

    @האדם-החושב תלוי האם אתה רוצה לעברית או לאנגלית.
    בכל אופן הערך wdToggle אינו קבוע אלא הופך מודגש ללא מודגש או לא מודגש למודגש.
    אם אתה רוצה משהו קבוע אתה צריך להשתמש בtrue או false

    עזרה הדדית - וורד

  • בקשת מידע | הוספת נקודות אחרי הטקסט עד סוף השורה
    מ מאקרו

    @mfmf בשביל לעשות עד סוף השורה תלחץ על יישור לשמאל.

    עזרה הדדית - וורד

  • המלצה | מדריך איך ליצור בעצמכם שדה מספר עמודים שפותר את באג שצג.dotx
    מ מאקרו

    @דאנציג כתב בהמלצה | מדריך איך ליצור בעצמכם שדה מספר עמודים שפותר את באג שצג.dotx:

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

    צודק, היה לי באג שצג... 😀
    שכחתי להוסיף את בורר העיצוב hebrew1 לעמודים שעד שצג כמו שכתב @pcinfogmach .

    @pcinfogmach כתב בהמלצה | מדריך איך ליצור בעצמכם שדה מספר עמודים שפותר את באג שצג.dotx:

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

    ככה הגדרתי בקובץ הנ"ל כדי שיהיה ניכר המספר עמוד בספרות גבוהות.

    עזרה הדדית - וורד

  • שאלה | הפעלת פקודה אוטומטית בוורד
    מ מאקרו

    @ש-בר
    זו הפקודה לוורד

    Private Sub Document_Open()
    'כאן מכניסים את הפקודה
    End Sub
    

    אשמח לעזור אם אתה צריך עזרה בפקודה ספציפית,
    בהצלחה!

    עזרה הדדית - מחשבים וטכנולוגיה

  • בקשה | שליטה על הגופנים בוורד
    מ מאקרו

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

    עזרה הדדית - מחשבים וטכנולוגיה

  • בירור | למה זה קורה?
    מ מאקרו

    @יצחק-בר אפשר לבטל את זה בהגדרות של התוסף.
    89a8c614-04a6-41b8-bb25-5cc27e320ed5-image.png

    עזרה הדדית - מחשבים וטכנולוגיה

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

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

    Sub טור_אחד_שאר_המסמך()
    Dim Alerts 
    Alerts = Application.DisplayAlerts
    Application.DisplayAlerts = wdAlertsNone
    Application.ScreenUpdating = False
     Do
        Selection.Find.ClearFormatting
        With Selection.Find.ParagraphFormat
            .Alignment = wdAlignParagraphCenter
        End With
        With Selection.Find
            .Text = "^p"
            .Replacement.Text = ""
            .Forward = True
            .Wrap = wdFindStop
            .Format = True
            .MatchCase = False
            .MatchWholeWord = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Dim a
        a = Selection.Find.Execute
        If a = True Then
            Selection.Paragraphs(1).Range.Select
            ActiveDocument.Range(Start:=Selection.Start, End:=Selection.Start). _
                InsertBreak Type:=wdSectionBreakContinuous
            Selection.Start = Selection.Start + 1
            ActiveDocument.Range(Start:=Selection.End, End:=Selection.End).InsertBreak _
                 Type:=wdSectionBreakContinuous
            With Selection.PageSetup.TextColumns
                .SetCount NumColumns:=1
                .EvenlySpaced = True
                .LineBetween = False
            End With
            Selection.MoveRight Unit:=wdCharacter, Count:=1
        End If
     Loop While a = True
     Application.DisplayAlerts = Alerts
     Application.ScreenUpdating = True
    
    End Sub
    

    אמנם כאשר יש כמה כותרות רצופות יהיה מעבר מקטע ביניהם ודו"ק.

    עזרה הדדית - עימוד

  • בקשת מידע | עמודים ב. ב:
    מ מאקרו

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

    עזרה הדדית - וורד
  • התחברות

  • אין לך חשבון עדיין? הרשמה

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