Hallo!
Ich kriege es einfach nicht hin, dass ein Word-Formular wieder geschützt wird.
Ich Butze diesen Code, um den Schutz aufzuheben:
If wrdDoc.ProtectionType = 0 Then
wrdDoc.Unprotect
End if
Das klappt auch winderbar.
Dann soll irgendwann das hier kommen:
If wrdDoc.ProtectionType = 0 Then
wrdDoc.Unprotect
Else
wrdDoc.Protect Type:=wdAllowOnlyFormFields, Password:=""
End If
Der zweite Teil davon soll das Word-Doc wieder schützen.
Tut es aber nicht.
Es kommt Laufzeitfehler 13 "Typen unverträglich".
Was mache ich falsch?
Gruß und Danke!
Werner