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

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

@ידיד כתב בבקשת מידע | מה התוסף שנחסם לי:

@es0583292679 כתב בבקשת מידע | מה התוסף שנחסם לי:

תוריד שוב מהקישור

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

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

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

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

@חכם-וזקן
זה הענין, שאין דבר כזה לכאורה, ולכן יש כמה אנשים שתפחו לזה תוסף בכסף.
אך בלי תוסף אתה יכול פשוט לעשות את כל השלבים במאקרו, שזה בעצם קיבוץ של פעולות בזה אח"ז, אך זה עלול לקחת לך שנים עד שתגמור את כל הספר... הרעיון בתוסף ובמאקרו, שהוא בונה רשימת קומבינות רצופות שרצות ברגע בצורה אוטומטית אחת אחרי השניה בלי לעצור, ואז מה שלוקח שנה לוקח רגע.
אך במקום ליפול חלילה בכזה צער, אני מייעץ לך עצה הוגנת, לשאול במקום זאת איך מכניסים מאקרו, זה הרבה הרבה יותר פשוט.
פתח את 'מפתחים', (בדר"כ זה מכובה ב'התרמה האישית של הסרגלים' וצריך לסמן זאת), תכנס ל'Visual Basic', ותכניס את הקוד שהעלו לכאן, כזה:
f444eafc-f2d0-408f-bdc3-c58c2cc46868-image.png
7a332f33-cdc7-4ca2-a36f-1c21b2414977-image.png

אח"כ תפעיל את זה ממפתחים>פקודות מאקרו, כזה:
b5f83acc-2d5b-4e1d-a635-b1f7d256c489-image.png

@106 כן. אולי השתבש לי כי הגדרתי גודל B5 והמדפסת שלי רק A4.

@poker לא יודע...

@מאקרו תודה רבה!! אני ינסה

@מושיקו-2000 כתב בעזרה | עיצוב אובייקט:

אני חושב שהשרשור הזה יעזור
(במיוחד הפתרון הראשון)

באמת עזר
פשוט לעשות העתק הדבק לתמונה במקום לגרור אותה
תודה רבה!!

@poker כנראה בעיה של נטפרי, ניסיתי להוריד בעצמי וגם לי משום מה לא ירד, לכן שלחתי בקשת פתיחה לנטפרי...
מקווה שיצליחו לאתר את הבעיה...
לפי הרישום בתעבורת אינטרנט:c2e142c9-92be-4ced-b29e-c2c71a446e0a-image.png התמונה בדברת בעד עצמה...
אגב, אתה יכול להתרשם מהפונקציות שבתוסף על ידי ההסרטות.
כמו כן, כדי להתקין את התוסף ללא הניקוד, אתה יכול להוריד את הקובץ הזה בלבד, ולא נראה לי שצריך את שאר הדברים, את הקובץ הגדול רק מי שרוצה גם את הניקוד צריך להוריד.
בהצלחה

@למה-מה-קרה @מוחין-דגדלות
היא כבר סידרה את זה
https://mitmachim.top/topic/44567/שאלה-פריצה-לאופיס?_=1660709216715

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

@עניו-כמשה מסמתא ctrl+s

@פינחסס

Public Sub EnHeb() Const listEn = "qwertyuiopasdfghjkl;'zxcvbnm,./()[]{}" Const listHeb = "/'קראטוןםפשדגכעיחלךף,זסבהנמצתץ.)(][}{" Dim Status As Long Dim i As Long Dim Str As String Dim Result As String Str = Selection Do While Status = 0 And Mid(Str, i + 1, 1) <> "" If InStr(listEn, Mid(Str, i + 1, 1)) > 0 Then Status = -1 If InStr(listHeb, Mid(Str, i + 1, 1)) > 0 Then If Status = -1 Then Status = 0 Else Status = 2 Else Status = IIf(Status = -1, 1, 0) End If i = i + 1 Loop For i = 1 To Len(Str) If Status = 2 Then If Mid(Str, i, 1) = "" Then ElseIf InStr(listHeb, Mid(Str, i, 1)) > 0 Then Result = Result & Mid(listEn, InStr(listHeb, Mid(Str, i, 1)), 1) ElseIf InStr(listEn, Mid(Str, i, 1)) > 0 Then Result = Result & Mid(listHeb, InStr(listEn, Mid(Str, i, 1)), 1) Else Result = Result & Mid(Str, i, 1) End If Else If Mid(Str, i, 1) = "" Then ElseIf InStr(listEn, Mid(Str, i, 1)) > 0 Then Result = Result & Mid(listHeb, InStr(listEn, Mid(Str, i, 1)), 1) ElseIf InStr(listHeb, Mid(Str, i, 1)) > 0 Then Result = Result & Mid(listEn, InStr(listHeb, Mid(Str, i, 1)), 1) Else Result = Result & Mid(Str, i, 1) End If End If Next i Selection = Result End Sub

קוד ש @מגדלים הביא פעם מאיפשהו

@משה-מזרחי
תודה רבה

@כתר-התורה תודה רבה כן בתצוגה זה היה על מצב זה לצד זה לא שמתי לב לפני זה הסתדר תודה

תעשה חיפוש למילים "קווי יישור", ותסמן וי כמו בתמונה הזו:
1111111111111.png

@MOSHE
בעריכת כותרת עליונה ותחתונה > מספרי עמוד > עיצוב מספרי עמוד
היה כמה עמודים שהתחילו מחדש ולא המשיכו מהקודם

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