בקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?

[אברהם 0]

@לשכת-הרבתבחר את כל המסמך עם CTRL+A

[לשכת הרב]

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

@לשכת-הרבתבחר את כל המסמך עם CTRL+A

יש גם כותרות וכו' אני לא רוצה שזה יעשה ככה על כל המסמך אלא על כל הטקסט הרגיל בקובץ

[לשכת הרב]

מישהו יודע דרך לעשות שבכל הקובץ חוץ מכותרות וכו' אלא רק על הטקסט הרגיל, שיוכנס השורה הראשונה?

[u88]

@לשכת-הרב יש לי את זה בפקודת מאקרו אם אפשרות בחירה בלי נדר אבדוק לך היכן זה ואשלח בעזה"י

[u88]

@לשכת-הרב

Sub כניסה_לתחילת_השורה_הראשונה()
    Dim פסקה As Paragraph
    Dim מספר_שורות As Integer

    ' בקשת בחירת מספר השורות
    מספר_שורות = InputBox("הכנס את מספר השורות הרצוי לפסקאות עליהן תוחל הכניסה (1, 2, 3, או יותר):")

    ' מעבר על כל הפסקאות במסמך
    For Each פסקה In ActiveDocument.Paragraphs
        ' בדיקה אם הפסקה מכילה את מספר השורות הנדרש
        If פסקה.Range.ComputeStatistics(wdStatisticLines) = מספר_שורות Or (מספר_שורות >= 3 And פסקה.Range.ComputeStatistics(wdStatisticLines) >= 3) Then
            ' הגדרת כניסה לתחילת השורה הראשונה ב-10 מ"מ (שווה ל-1 ס"מ)
            פסקה.Format.FirstLineIndent = CentimetersToPoints(1)
        End If
    Next פסקה
End Sub

תגדיר כמה אתה רוצה שהוא יכנס באדיבות צ'אט gpt
ותעדכן

[אברהם 0]

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

[לשכת הרב]

@u88 כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@לשכת-הרב

Sub כניסה_לתחילת_השורה_הראשונה()
    Dim פסקה As Paragraph
    Dim מספר_שורות As Integer

    ' בקשת בחירת מספר השורות
    מספר_שורות = InputBox("הכנס את מספר השורות הרצוי לפסקאות עליהן תוחל הכניסה (1, 2, 3, או יותר):")

    ' מעבר על כל הפסקאות במסמך
    For Each פסקה In ActiveDocument.Paragraphs
        ' בדיקה אם הפסקה מכילה את מספר השורות הנדרש
        If פסקה.Range.ComputeStatistics(wdStatisticLines) = מספר_שורות Or (מספר_שורות >= 3 And פסקה.Range.ComputeStatistics(wdStatisticLines) >= 3) Then
            ' הגדרת כניסה לתחילת השורה הראשונה ב-10 מ"מ (שווה ל-1 ס"מ)
            פסקה.Format.FirstLineIndent = CentimetersToPoints(1)
        End If
    Next פסקה
End Sub

תגדיר כמה אתה רוצה שהוא יכנס באדיבות צ'אט gpt
ותעדכן

לאן אני מעתיק את זה? תוכל להסביר עדיף עם תמונה

[ע"ה דכו"ע]

@לשכת-הרב כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@u88 כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@לשכת-הרב

Sub כניסה_לתחילת_השורה_הראשונה()
    Dim פסקה As Paragraph
    Dim מספר_שורות As Integer

    ' בקשת בחירת מספר השורות
    מספר_שורות = InputBox("הכנס את מספר השורות הרצוי לפסקאות עליהן תוחל הכניסה (1, 2, 3, או יותר):")

    ' מעבר על כל הפסקאות במסמך
    For Each פסקה In ActiveDocument.Paragraphs
        ' בדיקה אם הפסקה מכילה את מספר השורות הנדרש
        If פסקה.Range.ComputeStatistics(wdStatisticLines) = מספר_שורות Or (מספר_שורות >= 3 And פסקה.Range.ComputeStatistics(wdStatisticLines) >= 3) Then
            ' הגדרת כניסה לתחילת השורה הראשונה ב-10 מ"מ (שווה ל-1 ס"מ)
            פסקה.Format.FirstLineIndent = CentimetersToPoints(1)
        End If
    Next פסקה
End Sub

תגדיר כמה אתה רוצה שהוא יכנס באדיבות צ'אט gpt
ותעדכן

לאן אני מעתיק את זה? תוכל להסביר עדיף עם תמונה

זה נשמע שיותר תסתדר עם מה ש @אברהם-0 כתב.
לעשות החלפה אתה יודע?

[לשכת הרב]

@ע-ה-דכו-ע כן זה קל
אבל להיכן אני מכניס את המאקרו

[ע"ה דכו"ע]

@לשכת-הרב כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@ע-ה-דכו-ע כן זה קל
אבל להיכן אני מכניס את המאקרו

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

[לשכת הרב]

@ע-ה-דכו-ע כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@לשכת-הרב כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@ע-ה-דכו-ע כן זה קל
אבל להיכן אני מכניס את המאקרו

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

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

[ע"ה דכו"ע]

@לשכת-הרב כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@ע-ה-דכו-ע כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@לשכת-הרב כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@ע-ה-דכו-ע כן זה קל
אבל להיכן אני מכניס את המאקרו

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

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

בחלון שהעלית את התמונה שלו תכתוב משהו בשורה של השם מאקרו (לא משנה מה, בכל מקרה השם כתוב כבר במאקרו עצמו), ותלחץ על צור בצד שמאל, ואז תמחק את כל מה שכתוב שם, ותדביק במקום זה את הקוד ש @u88 הביא.
אח"כ כבר יהיה לך ברשימה את המאקרו ותוכל להפעיל אותו.

[לשכת הרב]

@u88 כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

תגדיר כמה אתה רוצה שהוא יכנס

מה הכוונה? @ע-ה-דכו-ע היכן להגדיר?

[ע"ה דכו"ע]

@לשכת-הרב כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@u88 כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

תגדיר כמה אתה רוצה שהוא יכנס

מה הכוונה? @ע-ה-דכו-ע היכן להגדיר?

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

[לשכת הרב]

@ע-ה-דכו-ע כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@לשכת-הרב כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@ע-ה-דכו-ע כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@לשכת-הרב כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@ע-ה-דכו-ע כן זה קל
אבל להיכן אני מכניס את המאקרו

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

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

בחלון שהעלית את התמונה שלו תכתוב משהו בשורה של השם מאקרו (לא משנה מה, בכל מקרה השם כתוב כבר במאקרו עצמו), ותלחץ על צור בצד שמאל, ואז תמחק את כל מה שכתוב שם, ותדביק במקום זה את הקוד ש @u88 הביא.
אח"כ כבר יהיה לך ברשימה את המאקרו ותוכל להפעיל אותו.

ניסתי לכתוב משהו ולעשות צור, וזה מה שכותב לי:

[ע"ה דכו"ע]

@לשכת-הרב כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@ע-ה-דכו-ע כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@לשכת-הרב כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@ע-ה-דכו-ע כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@לשכת-הרב כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@ע-ה-דכו-ע כן זה קל
אבל להיכן אני מכניס את המאקרו

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

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

בחלון שהעלית את התמונה שלו תכתוב משהו בשורה של השם מאקרו (לא משנה מה, בכל מקרה השם כתוב כבר במאקרו עצמו), ותלחץ על צור בצד שמאל, ואז תמחק את כל מה שכתוב שם, ותדביק במקום זה את הקוד ש @u88 הביא.
אח"כ כבר יהיה לך ברשימה את המאקרו ותוכל להפעיל אותו.

ניסתי לכתוב משהו ולעשות צור, וזה מה שכותב לי:

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

[לשכת הרב]

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

[ע"ה דכו"ע]

@לשכת-הרב כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

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

איזה מספר כתבת? בדקת שיש פסקה שיש בה כזה מספר של שורות או יותר והיא לא השתנתה?
לא אני הבאתי את הקוד, אבל זה נראה שהוא אמור לעבוד.

[לשכת הרב]

@ע-ה-דכו-ע כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

@לשכת-הרב כתב בבקשת מידע | איך להכניס מעט את השורה בכל תחילת קטע?:

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

איזה מספר כתבת? בדקת שיש פסקה שיש בה כזה מספר של שורות או יותר והיא לא השתנתה?
לא אני הבאתי את הקוד, אבל זה נראה שהוא אמור לעבוד.

כן כתבתי לדוגמא 2
דהיינו שרק מ 2 שורות זה יעבוד
אבל לא עשה שום שינוי

[בנימין כפיר]

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

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

תעדכן אם עזר