שיתוף | "מתעדכן" אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות.
-
@menajemmendel כתב בשיתוף | אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות:
@מניין כתב בשיתוף | אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות:
יש להדגיש, שעל הסוגר האחרון של המסמך זה לא עובד.
נכון שמתי לב לזה, אז נראה לי שאני הוסיף למאקרו שמתחילה יכתוב בסוף המסמך סוגר, ובסוף המקראו ימחוק אותו
צריך לתקן בשני השלבים, לפני הצביעה בכחול צריך להוסיף סוגר שמאל ), ולאחר צביעה בכחול למחוק אותו, ואח"כ לפני הצביעה באדום להוסיף בסוף סוגר ימין (, ולאחר הצביעה באדום למחוק אותו, ודו"ק.
-
@pcinfogmach
הערות שוליים ברצף
הערות שוליים ברצף.dotm
מקור
https://mitmachim.top/post/553824 -
קוד VBA להמיר בוורד ממספרים לאותיות, רגיל ובלשון נקייה.
ממיר מספרים לאותיות רגיל ובלשון נקיה.dotm
מקור:
@מגדלים
https://mitmachim.top/post/353249 -
M menajemmendel התייחס לנושא זה ב
-
מאקרו לשינוי המרווח בין הטורים רק בהערות שוליים
שינוי מרווח בין טורים רק בהערות שוליים.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
-
-
@מניין כתב בשיתוף | אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות:
@mfmf כתב בשיתוף | אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות:
קוד VBA להמיר בוורד ממספרים לאותיות, רגיל ובלשון נקייה.
ממיר מספרים לאותיות רגיל ובלשון נקיה.dotm
מקור:
@מגדלים
https://mitmachim.top/post/353249בענין המרכאות, כרגע בלשון נקיה יש מרכאות, וברגיל אין, אם אפשר כדאי לתת את שני האפשרויות בשניהם.
ותודה רבה לך על הכלהוספתי אפשרות של רגיל עם מרכאות ובלשון נקיה בלי מרכאות.
ממיר מספרים לאותיות רגיל ובלשון נקיה.dotm -
מ מניין התייחס לנושא זה ב
-
מאקרו חשוב, כדאי להוסיף לתוסף.
https://tchumim.com/topic/15060/שיתוף-מאקרו-לגיבוי-תבנית-normal@מעלה-ומוריד כתב בשיתוף | מאקרו לגיבוי תבנית Normal:
אצלי לפחות, ונראה לי שאצל כל המשתמשים הכבדים בוורד, קורה לעיתים שתבנית הNormal נפגמת פתאום, והוורד מייצר אחת חדשה כזו.
ואז מאבדים דברים חשובים מאד וצריך להתחיל מאפס.- מאקרואים מותאמים אישית, עמל של שעות לאורך שנים.
- מקשי קיצור להפעלת פקודות ופקודות מאקרו, מעייף לשחזר הכל.
הנה דוגמה: https://tchumim.com/post/147744
בחסות GPT מצ"ב מאקרו לגיבוי של תבנית הנורמל, אצלי הכנסתי אותו בסרגל גישה מהירה ובכל פעם שאכניס מאקרו חדש לא נותר לי אלא ללחוץ על גיבוי...
Sub BackupNormalDotm() Dim fso As Object Dim sourcePath As String Dim destPath As String Dim fileName As String Dim dateTimeStamp As String Set fso = CreateObject("Scripting.FileSystemObject") sourcePath = "C:\Users\MyUser\AppData\Roaming\Microsoft\Templates\" destPath = "C:\Users\MyUser\AppData\Roaming\Microsoft\Templates\NormalBackup\" dateTimeStamp = Format(Now, "dd_mm_yy_hh_mm_ss") fileName = "Normal.dotm" If Not fso.FolderExists(destPath) Then fso.CreateFolder destPath End If If fso.FileExists(sourcePath & fileName) Then fso.CopyFile sourcePath & fileName, destPath & Left(fileName, Len(fileName) - 5) & "_" & dateTimeStamp & ".dotm" MsgBox "הקובץ הועתק בהצלחה ונוסף לתיקיית הגיבוי." Else MsgBox "הקובץ המקורי אינו קיים." End If Set fso = Nothing End Sub
כל מי שמתעסק עם מאקרואים חייב להיתקל בתקלה הזו...
-
@מעלה-ומוריד כתב בשיתוף | מאקרו לוורד להצגת כל קיצורי המקשים המותאמים אישית:
למקרה ששכחת מה הגדרת, או אולי כבר הגדרת את קיצור המקשים הספציפי ואתה עכשיו עלול לדרוס אותו
מצ"ב קוד פשוט להצגת חלונית דו שיח עם רשימת הקיצורים שאתה הגדרת.Sub PrintCustomKeyBindingsShort() Dim kb As KeyBinding Dim msg As String For Each kb In Application.KeyBindings If kb.KeyCategory = wdKeyCategoryMacro Then Dim keyDetails As String keyDetails = kb.KeyString & " — " & Replace(kb.Command, "Normal.NewMacros.", "") msg = msg & keyDetails & vbCrLf End If Next kb MsgBox msg, vbInformation + vbRightToLeft, "מקשי קיצור מותאמים אישית" End Sub
-
חילוץ טקסט
חילוץ טקסט סרטון.rar
סיסמה 1234
תיאור: מפרק את כל ההערות שבמסמך [בלון, שוליים, הערות] למסמכים נפרדים, ומשאיר הפניות במסמך המקורי, סוג סוגריים לבחירת המשתמש.
נבנה בעזרת chetGPT, יתכן שיש מלא טעויות. אצלי עובד חלק.
אם יש יותר ממסמך אחד פעיל, המאקרו עושה חצי מהפעולות במסמך זה, וחצי במסמך השני. כך שיש להשאיר רק את המסמך שרוצים לבצע בו פועל.
מבחינת שיפורים - יש הרבה מה לשפר ואין לי כרגע זמן לזה -
@צדיק-וטוב-לו-0 כתב בשיתוף | אוסף מאקרו לוורד - אינדקס מאקרו שימושי + הוראות חשובות:
אגב, למה הקישור של הפוסט מביא לשרשור שלא קשור בכלל?
עכשיו מפנה למקור...
בקצרה - ציטוט מאתר תחומים. בציטוט המערכת מכניסה קישור פנימי, במקרה הזה היה זה, במילים: /post/153122. ערכתי ושמתי קישור רגיל.