@אלוף-תימן כתב:

תעלה תמונה של הנגן (נראה שהפוסט בניסוח ai)

צודק, (פשוט אין לי מושג איך מסבירים מה הגירסא)
זה התמונה:

שלום לכולם,

אני זקוק לקובץ צריבה (Scatter) בגרסה בעברית וחסומה הרמטית לאינטרנט עבור נגן שהפסיק לעבוד.

להלן הפרטים המדויקים מתוך הלוח הפנימי:

• מעבד: MT6580 (מזוהה במחשב כ-MT65xx Preloader)
• דגם לוח: WT_M35
• דרייבר מסך (פלאט): WT_M35_LCD3.99_SUB_FPC_20220613
  אשמח מאוד אם מישהו שמחזיק בגרסה מותאמת ל-LCD3.99 יוכל להעלות קישור להורדה עבור SP Flash Tool.

תודה רבה מראש!

@שלמה11 כתב:

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

וכמובן צריך להוסיף טאב קטן בניהם (בלי נקודות)

@שלמה11 כתב:

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

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

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

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

מאקרו להחלת טור אחד לפי סגנון

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

Spoiler

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

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

@שלמה11
הולך להיות עדכון של שולחן העורך? (יישור טורים, יישור עמוד, תוכן עניינים)

@שלמה11 ג"א מצטרף

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

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

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

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

@pcinfogmach כתב בהצעת ייעול | יישור טורים עד השוליים:

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

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

@שלמה11
אולי כדאי שתוסיף ליישור עמוד וכן ליישור טורים פונקציה שלוקחת את השארית שלא נכנסה במרווח אחרי פיסקה לדוגמא כשיש 5 פיסקאות ונשאר 0.15 ואי אפשר לחלק את זה ל5, לקחת את ה 0.15 לחלק ב 0.05 = 3 (שיש 3 פעמים 0.05) ולהכניס 0.05 ל3 פיסקאות העליונות ואז הדיוק יהיה מרבי, בתוצאה כל הפיסקאות יהיו עם אותו מרווח למעט ה3 פיסקאות העליונות שיהיו עם 0.05 יותר.

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

@שלמה11
אתה צודק הקובץ הזה מיושר די בסדר, אבל שוב, לא 100% (בטור הראשון אני יכול להוסיף עוד 0.1 ועדיין השורה האחרונה תישאר בטור.
ברמת העיקרון הדיוק הזה הוא בסדר, רק אם יהיה לך 7 פיסקאות בטור הסטייה תצטבר כבר למשהו גדול ולכן אני עדיין חושב שהשיטה שלי עדיפה.

@pcinfogmach
אכן כמו ש @שלמה11 כתב האופציה הזאת לא עובדת

בסיום הפעולה הטורים שווים עד 0.1 נקודה שזה 0.035 מ"מ, נראה לך שצריך יותר???

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

עכ"פ בקשתי מ AI לעשות את זה וזה מה שהוא נתן (כמובן שזה לא עובד...)

Sub StretchColumnToBottom()
    Dim doc As Document
    Dim selectionRange As Range
    Dim totalLines As Long
    Dim footerLines As Long
    Dim originalLineCount As Long
    Dim currentLineCount As Long
    Dim para As Paragraph
    Dim spaceAfter As Single
    Dim columnRange As Range
    Dim i As Long
    Dim endOfColumn As Boolean
    
    Set doc = ActiveDocument
    Set selectionRange = Selection.Range
    Set columnRange = selectionRange.Duplicate
    
    ' שלב 1: ספירת השורות בטור אליו נמצא הסמן
    totalLines = CountLinesInColumn(columnRange)
    
    ' שלב 2: ספירת שורות בהערות שוליים אם יש
    footerLines = CountFootnotes(doc)
    
    originalLineCount = totalLines + footerLines
    currentLineCount = originalLineCount
    
    ' שלב 3: לולאת הגדלת הרווחים
    Do While currentLineCount = originalLineCount
        ' שלב 4: סמן את כל הפיסקאות בטור, חוץ מהאחרונה
        For Each para In columnRange.Paragraphs
            If para.Index < columnRange.Paragraphs.Count Then
                spaceAfter = para.Range.ParagraphFormat.SpaceAfter
                para.Range.ParagraphFormat.SpaceAfter = spaceAfter + 0.05
            End If
        Next para
        
        ' שלב 6: בדוק אם יש שינוי במספר השורות
        currentLineCount = CountLinesInColumn(columnRange) + footerLines
        
        If currentLineCount <> originalLineCount Then
            Exit Do
        End If
    Loop
    
    ' שלב 7: סוף לולאה ראשונה
    
    ' שלב 8: בחר את הפיסקה הראשונה בטור
    Set para = columnRange.Paragraphs(1)
    
    ' שלב 9: לולאת הקטנת הרווחים
    Do
        ' שלב 10: בחר את הפיסקה הבאה או את הראשונה אם הגעת לאחרונה
        If para.Index < columnRange.Paragraphs.Count Then
            Set para = columnRange.Paragraphs(para.Index + 1)
        Else
            Set para = columnRange.Paragraphs(1)
        End If
        
        ' שלב 11: הורד 0.05 נקודות מהמרווח אחרי הפיסקה
        spaceAfter = para.Range.ParagraphFormat.SpaceAfter
        para.Range.ParagraphFormat.SpaceAfter = spaceAfter - 0.05
        
        ' שלב 12: בדוק אם מספר השורות השתנה
        currentLineCount = CountLinesInColumn(columnRange) + footerLines
        
        If currentLineCount = originalLineCount Then
            Exit Do
        End If
    Loop
    
    ' שלב 13: סוף לולאה שנייה
End Sub

Function CountLinesInColumn(columnRange As Range) As Long
    Dim para As Paragraph
    Dim totalLines As Long
    totalLines = 0
    For Each para In columnRange.Paragraphs
        totalLines = totalLines + para.Range.ComputeStatistics(wdStatisticLines)
    Next para
    CountLinesInColumn = totalLines
End Function

Function CountFootnotes(doc As Document) As Long
    Dim footnote As Footnote
    Dim totalLines As Long
    totalLines = 0
    For Each footnote In doc.Footnotes
        totalLines = totalLines + footnote.Range.ComputeStatistics(wdStatisticLines)
    Next footnote
    CountFootnotes = totalLines
End Function

@pcinfogmach תודה על המענה!
הבעיה שאני רוצה לפתור היא בעימוד קונטרסים ולדעתי זה בעיה בסיסית מאד (לי לוקח שעה לעמד 150 עמודים ואז עוד 3 שעות ליישר את הטורים, אם יעשו את המאקרו שהצעתי זה יקצר את היישור טורים לשעה)
בגדול הרעיון שלי הוא לענות על 2 צרכים:

• שהטורים יגיעו עד השוליים ממש ובכך הטורים יהיו מיושרים גם יחסית לעמודים אחרים
• שהטורים יהיו מתוחים עד המקסימום ברמה של 0.05 נק', איך אני עושה את זה, אני מוסיף לכל הפיסקאות במרווח אחרי פיסקה עד שהם מגיעות לשוליים, ואז אני מוסיף לכל פיסקה בנפרד 0.05 (שיכול להיות פיסקה אחת עם 8.55 אחריה ופיסקה אחת עם 8.5) עד שזה מגיע לשוליים במקסימום.

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