דילוג לתוכן
  • דף הבית
  • קטגוריות
  • פוסטים אחרונים
  • משתמשים
  • חיפוש
  • חוקי הפורום
כיווץ
תחומים

תחומים - פורום חרדי מקצועי

💡 רוצה לזכור קריאת שמע בזמן? לחץ כאן!
א.מ.א

א.מ.

@א.מ.
אודות
פוסטים
40
נושאים
6
קבוצות
0
עוקבים
1
עוקב אחרי
0

פוסטים

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

  • מדריך: חיפוש והחלפה בוורד
    א.מ.א א.מ.

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

    איך מחליפים?

    1. כנס לתיבת הדו שיח 'החלפה'. (CTRL+H)
    2. לחץ על 'עוד'.
    3. עמוד עם סמן העכבר ב-'חפש את'.

    לחיפוש טקסט בתוך סוגריים הקלד:

    \(*\)
    

    [לסוגריים מרובעות יש לחפש \[*\] וכן על זה הדרך]
    (יש לסמן ב-'וי' את 'השתמש בתווים כלליים')

    לחיפוש טקסט בסוגריים פנימיים בתוך סוגריים חיצונים הקלד:

    \([!^0013\(\)]@\)
    

    [לסוגריים מרובעות יש לחפש \[[!^0013\(\)]@\] וכן על זה הדרך]
    (יש לסמן ב-'וי' את 'השתמש בתוים כלליים')

    לחיפוש רווח לפני פיסקה הקלד:

    (^013)( )
    

    (יש לסמן ב-'וי' את 'השתמש בתווים כלליים')
    לחיפוש רווחים רבים לפני פיסקה הקלד:

     ^13 @<
    

    (יש לסמן ב-'וי' את 'השתמש בתווים כלליים')

    לחיפוש מילה ראשונה של פיסקה הקלד:

    ^13*>
    

    (יש לסמן ב-'וי' את 'השתמש בתווים כלליים')

    לחיפוש כל הניקוד במסמך הקלד:

    [^0192-^0204^0209^0210]
    

    לחיפוש כל הניקוד במסמך חוץ מ-שׁ ו-שׂ הקלד:

    [^0192-^0204]
    

    לחיפוש רווחים גדולים בתוך השורה (Tab) הקלד:

    ^t
    

    לחיפוש רווחים בין מילים הקלד:

    ^w
    

    לחיפוש רווחים בין פסקאות הקלד:

    ^p
    

    לחיפוש כל ספרה שבמסמך הקלד:

    ^#
    
    1. עמוד עם סמן העכבר ב-'החלף ב'.
    2. הגדר את העיצוב או את המילה או כל דבר אחר שאליו תרצה להחליף.
    3. לחץ למטה על 'החלף הכל'.

    בהצלחה!

    מי שיוכל להוסיף עוד קודים נצרכים שיוסיף בתגובות ותבוא עליו ברכה!


  • מאקרו לתיקון שגיאות נפוצות
    א.מ.א א.מ.

    בס"ד

    אלו התיקונים אותם עושה פקודת המאקרו:

    1. נקודות ופסיקים שאינם במקומם.
    2. רווח יחיד לפני ואחרי מקף.
    3. אותיות סופיות שאינן במקומן.
    4. סוגריים שאינם במקומם.
    5. רווח לפני פיסקה.
    6. פסיק בסוף פיסקה.

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

    בהצלחה!

    נ.ב. המאקרו נוצר לצורך מסויים ניתן לשנות את הקוד להלן להתאמה אישית של המאקרו.

    Sub תיקון_שגיאות()
    '
    ' תיקון_שגיאות Macro
    ' פקודת מאקרו זו מתקנת שגיאות טקסט במסמך בצורה אוטומטית
    '
    ' שאלת פתיחה
    If MsgBox("?האם לתקן שגיאות במסמך זה", vbYesNo) = vbYes Then
        Selection.Find.ClearFormatting
        Selection.Find.Replacement.ClearFormatting
        With Selection.Find
            .Text = "[,][א-ת]"
            .Replacement.Text = "$$^&"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchAllWordForms = False
            .MatchSoundsLike = False
            .MatchWildcards = True
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "[.][א-ת]"
            .Replacement.Text = "$$^&"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchAllWordForms = False
            .MatchSoundsLike = False
            .MatchWildcards = True
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "[;][א-ת]"
            .Replacement.Text = "$$^&"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchAllWordForms = False
            .MatchSoundsLike = False
            .MatchWildcards = True
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "[:][א-ת]"
            .Replacement.Text = "$$^&"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchAllWordForms = False
            .MatchSoundsLike = False
            .MatchWildcards = True
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "[םןץףך][א-ת]"
            .Replacement.Text = "$$^&"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchAllWordForms = False
            .MatchSoundsLike = False
            .MatchWildcards = True
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "[}\]\)][{\[\(]"
            .Replacement.Text = "^&$$"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchAllWordForms = False
            .MatchSoundsLike = False
            .MatchWildcards = True
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "[א-ת][{\[\(]"
            .Replacement.Text = "^&$$"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchAllWordForms = False
            .MatchSoundsLike = False
            .MatchWildcards = True
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "[}\]\)][א-ת]"
            .Replacement.Text = "$$^&"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchAllWordForms = False
            .MatchSoundsLike = False
            .MatchWildcards = True
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = ",(^013)"
            .Replacement.Text = "@@^&"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchAllWordForms = False
            .MatchSoundsLike = False
            .MatchWildcards = True
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "(^013)( )"
            .Replacement.Text = "^&@@"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchAllWordForms = False
            .MatchSoundsLike = False
            .MatchWildcards = True
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        Selection.Find.ClearFormatting
        Selection.Find.Replacement.ClearFormatting
        With Selection.Find
            .Text = "$$,"
            .Replacement.Text = ", "
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "$$."
            .Replacement.Text = ". "
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "$$;"
            .Replacement.Text = "; "
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "$$:"
            .Replacement.Text = ": "
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "-"
            .Replacement.Text = " - "
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "  -"
            .Replacement.Text = " -"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "-  "
            .Replacement.Text = "- "
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = " ,"
            .Replacement.Text = ","
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = " ."
            .Replacement.Text = "."
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = " ;"
            .Replacement.Text = ";"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = " :"
            .Replacement.Text = ":"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "$$ם"
            .Replacement.Text = "ם "
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "$$ן"
            .Replacement.Text = "ן "
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "$$ץ"
            .Replacement.Text = "ץ "
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "$$ף"
            .Replacement.Text = "ף "
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "$$ך"
            .Replacement.Text = "ך "
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = " ם"
            .Replacement.Text = "ם"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = " ן"
            .Replacement.Text = "ן"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = " ץ"
            .Replacement.Text = "ץ"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = " ף"
            .Replacement.Text = "ף"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = " ך"
            .Replacement.Text = "ך"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "[$$"
            .Replacement.Text = " ["
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "($$"
            .Replacement.Text = " ("
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "{$$"
            .Replacement.Text = " {"
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "$$)"
            .Replacement.Text = ") "
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "$$]"
            .Replacement.Text = "] "
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "$$}"
            .Replacement.Text = "} "
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "  "
            .Replacement.Text = " "
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "  "
            .Replacement.Text = " "
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = "@@,"
            .Replacement.Text = "."
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        With Selection.Find
            .Text = " @@"
            .Replacement.Text = ""
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchKashida = False
            .MatchDiacritics = False
            .MatchAlefHamza = False
            .MatchControl = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        Selection.Find.Execute
        Selection.Find.Execute Replace:=wdReplaceAll
        Selection.Find.Execute
    ' הודעת סיום
        MsgBox "!תיקון השגיאות הסתיים" & Chr(13) & "" & Chr(13) & "" & Chr(13) & "" & Chr(13) & "מאקרו תיקון שגיאות גרסה 2" & Chr(13) & "", vbMsgBoxRight
        Selection.Find.Execute Replace:=wdReplaceAll
           Else
           End If
        End Sub
    

    משום מה בשורה האחרונה של הקוד מופיע {1} יש לשנותו ל End Sub.


  • דיסק הצלה ווינדוס 10 בעברית
    א.מ.א א.מ.

    בס"ד

    דיסק הצלה מיועד לאושש את המערכת במקרה של קריסה וכדומה, כדי להשתמש בו יש לצרוב אותו על דיסק או על דיסק און-קי ולהעלות אותו דרך הביוס במחשב, ביציאה מהדיסק הצלה לא ישמרו הדברים שנעשו בו עצמו. (המערכת הפעלה של הדיסק הצלה היא ווינדוס 10 [מינימאלי] בעברית מלאה)

    תוכנת צריבה על דיסק
    תוכנת צריבה על דיסק און-קי

    הורדת הדיסק הצלה (גודל הקובץ: 2.5 GB)

    נ.ב. כדי להשתמש בשלל התוכנות המצויות בדיסק יש ללחוץ בחלון שיפתח עם העלאת המערכת בצד שמאל למעלה על 'File', ברשימה שתפתח יש ללחוץ על '...Scan for Executadls', בחלון החדש שיפתח יש לנווט לתיקייה בשם "PStart" הנמצאת בתוך הדיסק הצלה, לסמן אותה וללחוץ על "אישור", לאחר מכן תפתח רשימה חדשה עם התוכנות הנוספות הקיימות בדיסק הצלה.

    בהצלחה!

    תמונות לדוגמא:
    תמונה2.jpg
    תמונה1.jpg

    שים לב! הדיסק עודכן לגרסה חדשה כאן.


  • פתרון בעיות - שגיאת מחיצות בעת התקנת מערכת הפעלה
    א.מ.א א.מ.

    בס"ד

    פתרון בעיות - שגיאת מחיצות במהלך התקנת ווינדוס:

    לפעמים מופיעה בתחילת ההתקנה של מערכת ההפעלה הודעה כזו:
    "הודעת שגיאה: אין אפשרות להתקין WINDOWS בדיסק זה. הדיסק הנבחר כולל מחיצות מסוג MBR במערכות EFI ניתן להתקין WINDOWS בדיסקים מסוג GPT בלבד".

    פתרון הבעיה:

    1. העלה את התקנת הווינדוס מהדיסק און קי.

    2. לחץ על 'התקן עכשיו'. (או 'Install Now')

    3. לחץ על המקשים Shift +10 כדי לפתוח את חלון 'שורת הפקודה'.

    4. הקלד את הפקודה: Diskpart ולחץ על מקש 'Enter'.

    5. לאחר מכן הקלד את הפקודה: List Disk ולחץ על מקש 'Enter', תופיע רשימה של הכוננים במחשב ובצד שמאל יופיע מספר לכל כונן.

    6. לאחר מכן הקלד את הפקודה: Select Disk ולאחר מכן הקלד את מספר הכונן שעליו הנך רוצה להתקין את הווינדוס ולאחר מכן לחץ על מקש 'Enter'.

    7. לאחר מכן הקלד את הפקודה: Clean ולחץ על מקש 'Enter'.

    8. לאחר מכן הקלד את הפקודה: Convert GPT ולחץ על מקש 'Enter', הכונן יאותחל לסוג המחיצות הנדרש להתקנת הווינדוס.

    (הערה: פעולת האתחול תמחק את כל המידע שקיים בדיסק!!!).

    1. לסיום סגור את חלון 'שורת הפקודה' והפעל את המחשב מחדש.
    • בהצלחה!!!

    נ.ב. גם אם בשורת הפקודה מופיע סימני שאלה ולא האותיות עצמן זה יעבוד!


  • תיקיה חדשה בצורת מצלמה
    א.מ.א א.מ.

    רציתי להוסיף על הדברים של @chv שניתן להמיר כל קובץ תמונה על ידי תוכנת פורמט פקטורי וכדומה לקובץ ICO שהוא קובץ סמל וניתן להגדירו ידנית כסמל מותאם אישית של התיקייה.


  • דיסק הצלה בעברית
    א.מ.א א.מ.

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


  • איפוס סיסמא - ווינדוס 10
    א.מ.א א.מ.

    עם 'היירנס בוט' תוכל להסיר את הסיסמה בקלות!
    תוכל להוריד את הארכיון מכאן
    תחלץ את הקבצים מהארכיון ותצרוב את הקובץ ISO על דיסק או דיסק און-קי.
    הדרכה לשימוש בדיסק:

    1. מעלים את הדיסק מהביוס בתפריט שמופיע צריך לבחור באפשרות הראשונה של Mini PE [או Mini Windows xp] (זו מערכת חיצונית).
    2. עלינו למערכת!, על שולחן העבודה של מערכת Mini PE [או Mini Windows xp] יש אייקון (סמל) שחור שנקרא HBCD menu – תפעיל אותו!
    3. לבחור בתפריט Programs בצד שמאל למעלה > לבחור ב- Passwords/ keys > לבחור ב- Windows Login> לבחור ב- NTPWEdit.
    4. בחלון החדש לבחור Re-open (צד ימין) > כעת יש לבחור את שם המשתמש שרוצים לאפס > לאחר מכן יש לבחור ב- Change passwword > בשדות הריקים יש להקליד את הסיסמה החדשה פעמיים (ניתן גם להשאיר ריק) וללחוץ O.k > בסיום יש ללחוץ על כפתור Save setting.
    5. לסיום יש להפעיל את המחשב מחדש.

    - בהצלחה!!!


  • עזרה במעקב משלוח מסין
    א.מ.א א.מ.

    כנראה שהמשלוח לא בארץ בכלל, אם הוא אכן היה בארץ היית יכול לראות את המידע עליו שם.


  • מידע | מילון ארמי לוורד
    א.מ.א א.מ.

    אתה יכול לנסות את זה: המילון התורני.exe

    וגם כאן וכאן.

    בהצלחה!


  • מעקב שימוש במחשב ואינטרנט
    א.מ.א א.מ.

    למי שרוצה אפשר להשיג כאן את תוכנת המעקב הנפלאה Spyrix Personal Monitor.
    וכאן יש תרגום לעברית לתוכנה.

    נ.ב.
    יש להחריג את הנתיבים הבאים מהאנטי וירוס:

    C: \ ProgramData \ {89DF3612-BE12-A0A6-D34F-FD696F512FCB} \ *
    
    C: \ Windows \ runkey.exe
    

  • עזרה במעקב משלוח מסין
    א.מ.א א.מ.

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


  • הוספת שפה למצלמת קנון SX610
    א.מ.א א.מ.

    חשוב לציין כי במקרה שהשפה מתחלפת לסינית או משהו אחר, קנון הגדירו קיצור מקשים מיוחד להלחפת שפה והוא לחיצה על OK ו-MNNU.


  • איך מרימים ספר ב3 מ"מ ?
    א.מ.א א.מ.

    אתה יכול להדפיס את הקובץ PDF במדפסת PDF של אקרובט ולהגדיר את העמוד ידנית שיהיה בגודל שאתה רוצה.
    דוגמא:
    תמונה1.jpg


  • יש מתיבתא סרוק כמו שיש שוטנשטיין?
    א.מ.א א.מ.

    הסריקה של שוטנשטיין חוקית? (באוצר החכמה אין גמ' שוטנשטיין והוספת הספרים של עוז והדר עולים 1,500 ש"ח ולא ניתן להדפיס ל-PDF יותר ממספר עמודים בודדים בלבד)


  • בחירת מצלמה
    א.מ.א א.מ.

    @מעמד אמר בבחירת מצלמה:

    @א-מ אמר בבחירת מצלמה:

    עדיין יש לך את ה-WI-FI לפאלאפון (שדרך זה ניתן לשלוח תמונות לפאלאפון או לקבל ממנו תמונות וכן לשלוט על המצלמה באמצעותו) שצריך להוריד.

    כלומר שיש WI-FI רק שממצלמה למצלמה א"א לאעביר ולפלאפון כן ?

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


  • הערות באקרובט (עברית)
    א.מ.א א.מ.

    כתיבת טקסט באקרובט.jpg

    1. פותחים את רצועת הכלים.
    2. בוחרים בכרטיסיה 'תוכ'ן ב'הוסף או ערוך תיבת מלל'.
    3. בוחרים את סוג הגופן הרצויי.
    4. בוחרים את גודל הגופן הרצויי.

    בהצלחה!


  • נספח למאקרו לתיקון שגיאות נפוצות
    א.מ.א א.מ.

    המאקרו מוחק רווח לפני פסיקים או נקודות, אך לא את הפסיקים והנקודות עצמן.

    נ.ב. עדכנתי את המאקרו שיתקן גם סוגריים שאינן במקומן. (כגון: סוגריים צמודים אחד לשני או סוגריים צמודים לאותיות)


  • אנטי וירוס אופליין
    א.מ.א א.מ.

    @משתמש-חדש לאווסט יש אנטי וירוס חינמי עם תמיכה רישמית להתקנה אופליין כאן, ניתן להוריד גם את האנטי וירוס של ESET מכאן.

  • 1 / 1
  • התחברות

  • אין לך חשבון עדיין? הרשמה

  • התחברו או הירשמו כדי לחפש.
  • פוסט ראשון
    פוסט אחרון
0
  • דף הבית
  • קטגוריות
  • פוסטים אחרונים
  • משתמשים
  • חיפוש
  • חוקי הפורום