שיתוף | "מתעדכן" אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות.
-
@menajemmendel
נא לסגור מאקרו סוגריים בתוך תבנית לתועלת האשכול -
-
@menajemmendel כתב בשיתוף | אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות:
כנראה שאין לך סוגריים בעייתים, תפתח סוגרים בעמצע הסוגר ותבדוק שוב
לא הייתי כותב אלמלא שתלתי כמה סוגריים ללא פתיחה/סגירה.
פעם אחת כן עבד לי חלקית - שתלתי כמה סוגריים לא בן זוג, ורק אחד מהם סומן, והשאר לא. ובפעמים הבאות שניסתי לחזור על אותו טקטס לא מצא כלום.
כאן המקום להודות לך, אם זה יעבוד זה מאקרו מדהים, שמאוד מאוד יעזור.
חודש טוב -
-
@ASDF1345 כתב בשיתוף | אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות:
מאקרו מעבר מהערה למסמך ולהיפך, וכן מאקרו ליצירת אינדקס בקלות
מעבר-מהערה-למסמך ואינדקס.dotm
בהצלחהמאוד נחמד, אבל לגבי מעבר מהמסמך להערה לא צריך את כל הקוד, מספיק רק
ActiveWindow.View.SplitSpecial = wdPaneFootnotes
וזה למעבר למסמך מההערה
ActiveWindow.View.SeekView = wdSeekMainDocument
אגב, אני הוספתי את הפקודה הזו:
לשורה למעלה, כך שלחיצה על ALT + 5 (אצלי) מביאה את אותה פונקציה בפקודה אחת, דהיינו לחיצה אחת יורדת להערה, ולחיצה נוספת מעלה בחזרה לטקסט, כך שלא צריך שתי פקודות מאקרו נפרדות (שתי קצורי מקשים). -
@menajemmendel כתב בשיתוף | אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות:
@pcinfogmach
כידוע לפעמים תוך כדי הכתיבה פותחים סוגריים ושוכחים לסגור אותם, או שפותחים סוגריים בתוך סוגריים, דבר שלא תמיד מקובל
המאקרו הזה מחפש את המקרים האלה בצבע אדום, שאדם יוכל לתקנם (אפשר לעבור מאחד לשני עם קונטרול PAGEDOWNעריכה של ידידנו @דאנציג למטה https://mitmachim.top/assets/uploads/files/1682045184501-חיפוש-סוגריים-לא-סגורים.dotm
יש להדגיש, שעל הסוגר האחרון של המסמך זה לא עובד.
-
-
-
@מניין כתב בשיתוף | אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות:
יש להדגיש, שעל הסוגר האחרון של המסמך זה לא עובד.
נכון שמתי לב לזה, אז נראה לי שאני הוסיף למאקרו שמתחילה יכתוב בסוף המסמך סוגר, ובסוף המקראו ימחוק אותו
-
@menajemmendel כתב בשיתוף | אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות:
@מניין כתב בשיתוף | אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות:
יש להדגיש, שעל הסוגר האחרון של המסמך זה לא עובד.
נכון שמתי לב לזה, אז נראה לי שאני הוסיף למאקרו שמתחילה יכתוב בסוף המסמך סוגר, ובסוף המקראו ימחוק אותו
צריך לתקן בשני השלבים, לפני הצביעה בכחול צריך להוסיף סוגר שמאל ), ולאחר צביעה בכחול למחוק אותו, ואח"כ לפני הצביעה באדום להוסיף בסוף סוגר ימין (, ולאחר הצביעה באדום למחוק אותו, ודו"ק.
-
@pcinfogmach
הערות שוליים ברצף
הערות שוליים ברצף.dotm
מקור
https://mitmachim.top/post/553824 -
קוד VBA להמיר בוורד ממספרים לאותיות, רגיל ובלשון נקייה.
ממיר מספרים לאותיות רגיל ובלשון נקיה.dotm
מקור:
@מגדלים
https://mitmachim.top/post/353249 -
-
מאקרו לשינוי המרווח בין הטורים רק בהערות שוליים
שינוי מרווח בין טורים רק בהערות שוליים.dotm
שימושי במסמכים שהטקסט למעלה הוא טור אחד והטקסט למטה הוא בשני טורים ורוצים לשנות את המרווח.הוראות הפעלה: יש שלשה לחצנים, 1. הקטנת המרווח, 2. הרחבת המרווח, 3. איפוס הכניסות. כדאי בכל אופן לאפס לפני השימוש עם המאקרו, ואם לא מאפסים מקודם, לפעמים יוצא שגיאה, ואז צריך לאפס ולחזור שוב על המאקרו.
בהצלחהאבל צריך זהירות כי המאקרו עובד על כל המסמך, אם יש מישהו שיכול לסדר שילך רק על בחירה או על עמוד מסויים נשמח מאוד.
-
@u88 כתב בשיתוף | אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות:
@mfmf אם אפשר לצרף למאקרו גם את הקוד שפורסם פה אשמח מאוד
https://mitmachim.top/post/637732למירב הבנתי זה לא מאקרו, זה קוד שדה שצריך להדביק ישירות בדף שאתה עורך..
-
@מניין כתב בשיתוף | אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות:
מאקרו לשינוי המרווח בין הטורים רק בהערות שוליים
[שינוי מרווח בין טורים רק בהערות שוליים.dotm](אירעה שגיאה בעת ניתוח תגובת השרת)
שימושי במסמכים שהטקסט למעלה הוא טור אחד והטקסט למטה הוא בשני טורים ורוצים לשנות את המרווח.הוראות הפעלה: יש שלשה לחצנים, 1. הקטנת המרווח, 2. הרחבת המרווח, 3. איפוס הכניסות. כדאי בכל אופן לאפס לפני השימוש עם המאקרו, ואם לא מאפסים מקודם, לפעמים יוצא שגיאה, ואז צריך לאפס ולחזור שוב על המאקרו.
בהצלחהאבל צריך זהירות כי המאקרו עובד על כל המסמך, אם יש מישהו שיכול לסדר שילך רק על בחירה או על עמוד מסויים נשמח מאוד.
משהו לא תקין בקישור.
-
החלפת שדה נבחר למספור אוטומטי אותיות
החלפת שדה נבחר למספור אותיות.dotm
מקור:
https://mitmachim.top/post/637935 -
@צדיק-וטוב-לו-0 כתב בשיתוף | אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות:
@מניין כתב בשיתוף | אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות:
מאקרו לשינוי המרווח בין הטורים רק בהערות שוליים
[שינוי מרווח בין טורים רק בהערות שוליים.dotm](אירעה שגיאה בעת ניתוח תגובת השרת)
שימושי במסמכים שהטקסט למעלה הוא טור אחד והטקסט למטה הוא בשני טורים ורוצים לשנות את המרווח.הוראות הפעלה: יש שלשה לחצנים, 1. הקטנת המרווח, 2. הרחבת המרווח, 3. איפוס הכניסות. כדאי בכל אופן לאפס לפני השימוש עם המאקרו, ואם לא מאפסים מקודם, לפעמים יוצא שגיאה, ואז צריך לאפס ולחזור שוב על המאקרו.
בהצלחהאבל צריך זהירות כי המאקרו עובד על כל המסמך, אם יש מישהו שיכול לסדר שילך רק על בחירה או על עמוד מסויים נשמח מאוד.
משהו לא תקין בקישור.
עודכן
-
@mfmf כתב בשיתוף | אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות:
קוד VBA להמיר בוורד ממספרים לאותיות, רגיל ובלשון נקייה.
ממיר מספרים לאותיות רגיל ובלשון נקיה.dotm
מקור:
@מגדלים
https://mitmachim.top/post/353249בענין המרכאות, כרגע בלשון נקיה יש מרכאות, וברגיל אין, אם אפשר כדאי לתת את שני האפשרויות בשניהם.
ותודה רבה לך על הכל -
@pcinfogmach
הנה בעבר העליתי מאקרו לחיפוש סוגריים לא סגורים ובכלל זה סוגריים בתוך סוגריים) אבל היה בזה מספר באגים, וגם גיליתי שיש תקלה, שעלולה להיות חמורה, שמשום מה וורד בחפש בהחלף אם עושים החלף על קטע מסוימת לצבע מסויים, או כל הגדרה אחרת שקשורה לגופן, הופך את כל הקטע לאותו גופן, (ומה עלולות לצאת תקלות הרות אסון שאחריתם מי ישורנה, )
חוץ מזה לא היה מתקן את הסוגריים אחרון,אז הנה הגירסה החדשה
וסליחה שלא עשיתי את זה כתבנית, מי שיוכל שיעשה, לבקשת חברינו @pcinfogmachואגב הנה מעביר תשומת לב הציבור להשלמה חשובה לאשכול זה: https://mitmachim.top/topic/55141/שיתוף-אוסף-תבניות-לעימוד?_=1683792648707
Sub sograim_with_troubles() SELECTION.EndKey Unit:=wdStory Dim fake_bracket As Range SELECTION.TypeText Text:="(" SELECTION.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend Set fake_bracket = SELECTION.Range SELECTION.HomeKey Unit:=wdStory 'מחפש סוגריים בעיתיים וצובע אותם באדום Do SELECTION.Find.ClearFormatting With SELECTION.Find .Text = "\([!\)]@\(" .Forward = True .Wrap = wdFindStop .MatchWildcards = True End With SELECTION.Find.Execute SELECTION.Font.Color = wdColorRed Loop Until SELECTION.Find.Found = False fake_bracket.Delete SELECTION.HomeKey Unit:=wdStory 'מכין חיפוש לאדומים SELECTION.Find.ClearFormatting SELECTION.Find.Font.Color = wdColorRed With SELECTION.Find .Text = "" .Forward = True .Wrap = wdFindContinue .Format = True .MatchWildcards = False End With SELECTION.Find.Execute MsgBox ("זהו; הסוגריים הבעייתים סומנו, כדי למצוא אותם תלחץ על") & vbNewLine & ("CTRL PgDn") End Sub
-