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

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

איך מחליפים?

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

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

\(*\)

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

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

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

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

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

(^013)( )

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

 ^13 @<

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

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

^13*>

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

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

[^0192-^0204^0209^0210]

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

[^0192-^0204]

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

^t

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

^w

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

^p

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

^#

4. עמוד עם סמן העכבר ב-'החלף ב'.
5. הגדר את העיצוב או את המילה או כל דבר אחר שאליו תרצה להחליף.
6. לחץ למטה על 'החלף הכל'.

בהצלחה!

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

בס"ד

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

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 [מינימאלי] בעברית מלאה)

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

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

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

בהצלחה!

תמונות לדוגמא:

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

בס"ד

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

לפעמים מופיעה בתחילת ההתקנה של מערכת ההפעלה הודעה כזו:
"הודעת שגיאה: אין אפשרות להתקין 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', הכונן יאותחל לסוג המחיצות הנדרש להתקנת הווינדוס.

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

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

• בהצלחה!!!

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

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

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

עם 'היירנס בוט' תוכל להסיר את הסיסמה בקלות!
תוכל להוריד את הארכיון מכאן
תחלץ את הקבצים מהארכיון ותצרוב את הקובץ 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

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

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

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

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

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

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

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

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

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

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

בהצלחה!

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

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

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