لا أعتقد أن هذا نوع من الحماية
وعلى أي حال لماذا لا نقوم بعمل ماكرو يقوم بإرجاع الملف إلى حالته بعد نسخه من ملف الأكروبات عن طريق تغيير ترتيب الأحرف ..
أعتقد أن هذا الأمر ممكن .. وهذا مثال يمكنكم التعديل عليه:
Sub Macro()
'الذهاب إلى أول المستند
Selection.HomeKey Unit:=wdStory
'معرفة عدد الكلمات في المستند
Set wdDTWC = Dialogs(wdDialogToolsWordCount)
wdDTWC.Execute
dlgwordcount$ = wdDTWC.Words
'تحديد كلمة كلمة
For o = 1 To dlgwordcount$
Selection.Find.ClearFormatting
With Selection.Find
.Text = "<?*>"
.MatchWildcards = True
End With
Selection.Find.Execute
'وضع الكلمات في متغيرات
Dim x As String
Dim s As String
x = Len(Selection)
s = Selection
'قلب الكلمة إلى وضعها الطبيعي
For i = 0 To x - 1
Selection.TypeText Text:=Mid(s, (x - i), 1)
Next
Next
End Sub