Attribute VB_Name = "NewMacros"

Sub החלפת_אות()
Attribute החלפת_אות.VB_ProcData.VB_Invoke_Func = "Normal.NewMacros.החלפת_אות"
'
' החלפת_אות Macro
'
'
    Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend
    Selection.Cut
    Selection.MoveRight Unit:=wdCharacter, Count:=1
    Selection.PasteAndFormat (wdFormatOriginalFormatting)
End Sub
Sub החלפת_מילה()
Attribute החלפת_מילה.VB_ProcData.VB_Invoke_Func = "Normal.NewMacros.החלפת_מילה"
'
' החלפת_מילה Macro
'
'
    Selection.MoveRight Unit:=wdWord, Count:=1, Extend:=wdExtend
    Selection.Cut
    Selection.MoveRight Unit:=wdWord, Count:=1
    Selection.PasteAndFormat (wdFormatOriginalFormatting)
End Sub
Sub גופן_דוויד()
Attribute גופן_דוויד.VB_ProcData.VB_Invoke_Func = "Normal.NewMacros.גופן_דוויד"
'
' גופן_דוויד Macro
'
'
Selection.Font.Name = "david"
End Sub
Sub גופן_ספרדי()
'
' גופן_ספרדי Macro
'
'
Selection.Font.Name = "FbSfaradi"
End Sub
Sub גופן_ליוורנו_בולד()
'
' גופן_ליוורנו_בולד Macro
'
'
Selection.Font.Name = "FbLivorna Bold"
End Sub
Sub גופן_פרנקרוהל_מתוקן()
'
' גופן_פרנקרוהל_מתוקן Macro
'
'
Selection.Font.Name = "FrankRuehl DP"
End Sub
Sub גופן_וילנא_מתוקן()
'
' גופן_וילנא_מתוקן Macro
'
'
Selection.Font.Name = "VILNA מתוקן DP"
End Sub
Sub גופן_מקורות_רשי()
'
' גופן_מקורות_רשי Macro
'
'
Selection.Font.Name = "Mekorot-Rashi"
End Sub
Sub גופן_אשכנזי()
'
' גופן_אשכנזי Macro
'
'
Selection.Font.Name = "FbAshkenazi"
End Sub
Sub גופן_ברצלונה()
'
' גופן_ברצלונה Macro
'
'
Selection.Font.Name = "FbBarcelona Regular"
End Sub
Sub גופן_תהילה()
'
' גופן_תהילה Macro
'
'
Selection.Font.Name = "FbTehila"
End Sub
Sub גופן_קטיפה()
'
' גופן_קטיפה Macro
'
'
Selection.Font.Name = "FbKtifa"
End Sub
Sub גופן_ליוורנו()
'
' גופן_ליוורנו Macro
'
'
Selection.Font.Name = "FbLivorna"
End Sub
Sub גופן_מלכות_נוי()
'
' גופן_מלכות_נוי Macro
'
'
Selection.Font.Name = "S-Malc-Noy"
End Sub
Sub גופן_מלכות()
'
' גופן_מלכות Macro
'
'
Selection.Font.Name = "S-MalchutDot"
End Sub
Sub גופן_נרקיסים()
'
' גופן_נרקיסים Macro
'
'
Selection.Font.Name = "Narkisim"
End Sub
Sub גופן_מנטובה()
'
' גופן_מנטובה Macro
'
'
Selection.Font.Name = "Guttman Mantova"
End Sub
Sub גופן_דרוגולין()
'
' גופן_דרוגולין Macro
'
'
Selection.Font.Name = "Guttman Drogolin"
End Sub
Sub גופן_רשי_מתוקן()
'
' רשי_מתוקן Macro
'
'
Selection.Font.Name = "Rashi DP"
End Sub
Sub גופן_ספרדי_מדיום()
'
' ספרדי_מדיום Macro
'
'
Selection.Font.Name = "FbSfaradi Medium"
End Sub
Sub גופן_תהילה_מדיום()
'
' תהילה_מדיום Macro
'
'
Selection.Font.Name = "FbTehilaMedium"
End Sub
Sub גופן_וינציה()
'
' גופן_וינציה Macro
'
'
Selection.Font.Name = "Venezya"
End Sub
Sub גופן_ליוורנו_דק()
'
' גופן_ליוורנו_דק Macro
'
'
Selection.Font.Name = "FbLivorna Regular"
End Sub
Sub גופן_אהרוני()
'
' גופן_אהרוני Macro
'
'
Selection.Font.Name = "Guttman Aharoni"
End Sub
Sub גופן_הצבי()
'
' גופן_הצבי Macro
'
'
Selection.Font.Name = "Guttman Hatzvi"
End Sub
Sub גופן_גישה()
'
' גופן_גישה Macro
'
'
Selection.Font.Name = "Gisha"
End Sub
Sub גופן_הדסה()
'
' גופן_הדסה Macro
'
'
Selection.Font.Name = "Hadassah Friedlaender"
End Sub
Sub גופן_רשי_אמיתי()
'
' גופן_רשי_אמיתי Macro
'
'
Selection.Font.Name = "RashiAmiti"
End Sub
Sub גופן_שפע()
'
' גופן_שפע Macro
'
'
Selection.Font.Name = "FbShefa Pro"
End Sub
Sub גופן_ארם()
'
' גופן_ארם Macro
'
'
Selection.Font.Name = "Guttman-Aram"
End Sub
Sub גופן_יד_גוטמן_דק()
'
' גופן_יד_גוטמן_דק Macro
'
'
Selection.Font.Name = "Guttman Yad-Light"
End Sub
Sub גופן_יד_גוטמן()
'
' גופן_יד_גוטמן Macro
'
'
Selection.Font.Name = "Guttman Yad"
End Sub
Sub גופן_סתם_גוטמן()
'
' גופן_סתם_גוטמן Macro
'
'
Selection.Font.Name = "Guttman Stam"
End Sub
Sub גופן_סתם_גוטמן1()
'
' גופן_סתם_גוטמן1 Macro
'
'
Selection.Font.Name = "Guttman Stam1"
End Sub
Sub גופן_אריאל()
'
' גופן_אריאל Macro
'
'
Selection.Font.Name = "Arial"
End Sub