۸٬۳۵۰
ویرایش
Nazarzadeh (بحث | مشارکتها) بدون خلاصۀ ویرایش |
Nazarzadeh (بحث | مشارکتها) بدون خلاصۀ ویرایش |
||
خط ۸۴: | خط ۸۴: | ||
End With | End With | ||
Selection.Find.Execute Replace:=wdReplaceAll | Selection.Find.Execute Replace:=wdReplaceAll | ||
' | |||
' hazfe faseleye olguha | |||
' | |||
Selection.Find.ClearFormatting | |||
Selection.Find.Replacement.ClearFormatting | |||
With Selection.Find | |||
.Text = "}}^p^p{{" | |||
.Replacement.Text = "}}^p{{" | |||
.Forward = True | |||
.Wrap = wdFindAsk | |||
.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 Replace:=wdReplaceAll | |||
Application.Keyboard (1033) | |||
' | ' |