שאלה | פקודת מאקרו לתיקון שגיאות

[מאקרו]

@ש-בר הכוונה היא שיהיה רווח

[ש. בר.]

@מאקרו תודה
כבר בדקתי
לי אישית זה נוח, אבל יש הרבה שמשתמשים במקף צמוד למילים..

[תודה רבה 4]

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

[ש. בר.]

@תודה-רבה-4 כן, כבר ראיתי, אבל לא הבנתי מה זה ה'ולא כך' השני?

[תודה רבה 4]

@ש-בר שזה צמוד למילה הבאה. אעשה עם אות ישרה, שתשים לב. יש ן- ן
ויש ן -ן
ויש ן - ן
אתי שפיר?

[ש. בר.]

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

[תודה רבה 4]

@ש-בר אמר בשאלה | פקודת מאקרו לתיקון שגיאות:

אתה מכיר מי שמצמיד רק לאות אחת?

איך כתבת בנושא? "פקודת מאקרו לתיקון שגיאות".

@ש-בר אמר בשאלה | פקודת מאקרו לתיקון שגיאות:

עכ"פ הוא עושה רווח משני הצדדים, וזה לא תמיד רצוי

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

[ש. בר.]

@תודה-רבה-4 חשבתי שהתכוונת שמסתמא לא לזו היתה כוונתו ולכן התפלאתי מהיכא תיתי, אבל לא משנה מה היה ההוו"א [הלכתי על הארמית]
בכל אופן תודה על העזרה הרבה, הייתי נותן לך לייק אבל אני לא יכול עדיין..

[תודה רבה 4]

פוסט זה נמחק!

[ש. בר.]

פוסט זה נמחק!

[תודה רבה 4]

פוסט זה נמחק!

[ש. בר.]

פוסט זה נמחק!

[תודה רבה 4]

פוסט זה נמחק!

[ש. בר.]

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

1568978283541-מאקרו-תיקון-שגיאות.docm

רק אם זה בקלות..

[תודה רבה 4]

@ש-בר את אחד מהקטעים הבאים [או את כולם, לפי בחירתך].

    Selection.Find.Execute Replace:=wdReplaceAll
    With Selection.Find
        .Text = "-"
        .Replacement.Text = " - "
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchKashida = False
        .MatchDiacritics = False
        .MatchAlefHamza = False
        .MatchControl = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
    With Selection.Find
        .Text = "  -"
        .Replacement.Text = " -"
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchKashida = False
        .MatchDiacritics = False
        .MatchAlefHamza = False
        .MatchControl = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
    With Selection.Find
        .Text = "-  "
        .Replacement.Text = "- "
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchKashida = False
        .MatchDiacritics = False
        .MatchAlefHamza = False
        .MatchControl = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With

[ש. בר.]

@תודה-רבה-4 וואו תותח וזריז..

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

[ש. בר.]

@תודה-רבה-4 אולי תפרש מה זה אחד מהקטעים, ולפי מה אני אמור לבחור [למה נפק"מ]

[תודה רבה 4]

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

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

הקטע הראשון, מחליף כל דוגמה-דוגמה בדוגמה - דוגמה.
השני כל דוגמה -דוגמה בדוגמה - דוגמה.
השלישי מחליף כל דוגמה- דוגמה בדוגמה - דוגמה.
[יתכן שהשני והשלישי הפוכים, אבל זה הכיוון.]

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

[ש. בר.]

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

[תודה רבה 4]

@ש-בר זה של 'נקדנית' ועוד, תחפש בפורום. זה מתוספים. [אולי חלק שלי, אבל לא דברים ממש מעניינים.]