דילוג לתוכן
פורום לעורך התורני

הפורום לעורך התורני
  1. דף הבית
  2. ארכיון: הקבוצה הישנה
  3. 2024
  4. למבינים במאקרו
שימו לב — קטגוריית ארכיון
הנושאים בקטגוריה זו הועברו מארכיון קבוצת גוגל, והמשתמשים המוצגים בהם אינם פעילים בפורום.
לקבלת מענה או לתחילת דיון, מומלץ לפתוח נושא חדש בקטגוריה המתאימה.

למבינים במאקרו

2024
4 4 0 1
התחברו כדי לפרסם תגובה

  • י

    למבינים בהערות סקירה - האם ניתן להפנות משתי מקומות בטקסט להערה אחת

    2024
    4
    0 הצבעות
    4 פוסטים
    0 צפיות
    א
    תאריך ההודעה המקורית: 04/02/2024 15:29 אתה יכול ליצור הפניה בכתב עילי.
  • Y

    למבינים במאקרו

    2024
    1
    0 הצבעות
    1 פוסטים
    0 צפיות
    Y
    תאריך ההודעה המקורית: 16/05/2024 14:42 מתקשה להאמין שיש דבר כזה, אבל נחכה למומחים. לגבי הערת שוליים, למה אתה צריך מאקרו? מקסימום כדאי להחליף את קיצור המקשים לקיצור של שני כפתורים במקום שלושה (אני שיניתי הן את הערות שוליים והן את הערות סקירה שנעשות בכונטרול 1 וכונטרול 2 בהתאמה). בברכה מרובה. יוסף מיכאל יוסקוביץ 0548496207 מעוניינים במבוא לספר? ביוגרפיה לחיבור כלשהו?* תולדות לסבא שלכם?** - ב"ה בעל ניסיון בכתיבת מאות מבואות תולדות והקדמות לספרים שונים, עורך ספרי היסטוריה וספרים נוספים.* ב-יום חמישי, 16 במאי 2024 בשעה 14:18:34 UTC+3, שלום זיאת כתב/ה:
  • מ

    תיקון באג במאקרו ההזרחה

    2024
    1
    0 הצבעות
    1 פוסטים
    0 צפיות
    מ
    תאריך ההודעה המקורית: 28/05/2024 23:29 לאחר שימוש במאקרו ההזרחה החדש שפירסמתי לפני יומיים, גיליתי באג. כשעמדתי בהערות השוליים וחיפשתי את ההזרחה הבאה, הוא קפץ להזרחה הראשונה בהערות השוליים. לאחר בדיקות נראה שעכשיו זה מתוקן ומושלם. וזרח עליו השמש. הנה המאקרו המתוקן: Sub הדגשצהוב() ' Check if text is selected If Selection.Type = wdSelectionIP Then ' No text selected, search and select next highlighted text Dim rng As Range Set rng = ActiveDocument.Range ' Set the starting point to the current selection rng.Start = Selection.End ' Find the next highlighted text in the main document With rng.Find .ClearFormatting .Highlight = True .Wrap = wdFindStop .Forward = True .Execute End With If rng.Find.Found Then rng.Select Else ' If not found in main document, check in footnotes Dim ftNote As Footnote Dim ftRng As Range Dim foundInFootnote As Boolean foundInFootnote = False ' Adjust the range for searching footnotes Dim currentPosition As Long currentPosition = Selection.End For Each ftNote In ActiveDocument.Footnotes Set ftRng = ftNote.Range If ftRng.End > currentPosition Then ftRng.Start = Max(ftRng.Start, currentPosition) With ftRng.Find .ClearFormatting .Highlight = True .Wrap = wdFindStop .Forward = True .Execute End With If ftRng.Find.Found Then ftRng.Select foundInFootnote = True Exit For End If End If Next ftNote If Not foundInFootnote Then MsgBox "אין עוד טקסט מסומן עד סוף המסמך, כולל הערות שוליים." End If End If Else ' Check if the selected range is already highlighted If Selection.Range.HighlightColorIndex = wdYellow Then ' If highlighted, remove the highlighting Selection.Range.HighlightColorIndex = wdNoHighlight Selection.MoveRight Unit:=wdCharacter, Count:=1 Else ' If not highlighted, apply yellow highlighting Options.DefaultHighlightColorIndex = wdYellow Selection.Range.HighlightColorIndex = wdYellow End If End If End Sub Function Max(value1 As Long, value2 As Long) As Long If value1 > value2 Then Max = value1 Else Max = value2 End If End Function --
  • מ

    תיקון באג במאקרו ההזרחה

    2024
    1
    0 הצבעות
    1 פוסטים
    0 צפיות
    מ
    תאריך ההודעה המקורית: 30/05/2024 01:07 לאחר שפרסמתי את זה, וב"ה אצלי עובד מצויין, וכן עוד מחשב שהתקנתי בו, מישהו כתב לי שלא עובד אצלו טוב ומחזיר שגיאה. האם עוד מישהו ניסה אותו? מאת: [email protected] --
  • א

    עזרה במאקרו

    2024
    5
    0 הצבעות
    5 פוסטים
    0 צפיות
    א
    תאריך ההודעה המקורית: 01/08/2024 20:15 תנסה לעשות תיקון לתוכנות אופיס זה עוזר הרבה פעמים במקרים בדיוק כאלו. תיכנס ל'לוח הבקרה > תוכניות > תוכניות ותכונות', ושם תחפש את ישומי מייקרוסופט, בגירסת משרד החינוך זה נקרא כך- 'he-il-לארגונים 365 Microsoft יישומי', קליק ימני 'שנה', אחרי האישור שם, תפעיל 'תיקון מהיר'.
  • א

    למבינים: מהירות כונן חיצוני SSD עבור אוצר החכמה

    2024
    1
    0 הצבעות
    1 פוסטים
    0 צפיות
    א
    תאריך ההודעה המקורית: 22/08/2024 23:07 האם שווה להוסיף עוד 128 ש"ח עבור מהירות גבוהה יותר של קריאה וכתיבת נתונים? או שאין בזה צורך. יש בסנדיסק כמה דרגות של מהירות והפערים ביניהם משמעותיים. א. 800 מ"ב לשניה. ב. 1050 מ"ב לשנייה. ג. 2000 מ"ב לשניה.​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​​ [image: 84bb633c66b357270e75c9c096eb9b846f0d653f]
  • א

    שאלה למבינים: כונן חיצוני SSD עבור אוצר החכמה

    2024
    4
    0 הצבעות
    4 פוסטים
    0 צפיות
    ח
    תאריך ההודעה המקורית: 25/08/2024 14:59 המחירים כבר עלו *בתחילת שבוע שעבר *במאות שקלים לכל דיסק.
  • ש

    למבינים ב'קבוצות מייל'

    2024
    1
    0 הצבעות
    1 פוסטים
    0 צפיות
    ש
    תאריך ההודעה המקורית: 01/12/2024 17:39 פתחתי קבוצת מייל, הוא לא מאשר לצרף יותר מ[בערך] 50 אנשי קשר ביום. יש לי כמה אלפי כתובות מייל לצרף... יש דרך לעקוף את זה ? באישי, חדש. פליז. תודה

2

מחובר

793

משתמשים

14.1k

נושאים

63.0k

פוסטים