bigtalljv
08-29-2010, 12:44 PM
Hi,
I am writing a macro to enable and disable protection and to enable the inking feature. Protection allows the check boxes to be used and the they want to be able to shut it off to sign the form with the inking feature. so far I have this and it works great,
Private Sub ClicktoSign_Click()
' ******************************************
' ProtectForm Macro.
' Toggles protection for the active document
' when the Protect Form button on the forms
' toolbar is clicked.
' ******************************************
If ActiveDocument.ProtectionType = wdNoProtection Then
ActiveDocument.Protect Type:=wdAllowOnlyFormFields, _
NoReset:=True
Else
ActiveDocument.Unprotect Password:=""
Application.Run "InsertInkAnnotations"
End If
End Sub
What I can't find is the opposite of Application.Run "InsertInkAnnotations"
There is a command listed in the command list in the macros "DrawExitInkMode" but I can't seem to do anyting with it. all the button are grayed out.
Anybody know what I need to do?
Thanks,
Jason
I am writing a macro to enable and disable protection and to enable the inking feature. Protection allows the check boxes to be used and the they want to be able to shut it off to sign the form with the inking feature. so far I have this and it works great,
Private Sub ClicktoSign_Click()
' ******************************************
' ProtectForm Macro.
' Toggles protection for the active document
' when the Protect Form button on the forms
' toolbar is clicked.
' ******************************************
If ActiveDocument.ProtectionType = wdNoProtection Then
ActiveDocument.Protect Type:=wdAllowOnlyFormFields, _
NoReset:=True
Else
ActiveDocument.Unprotect Password:=""
Application.Run "InsertInkAnnotations"
End If
End Sub
What I can't find is the opposite of Application.Run "InsertInkAnnotations"
There is a command listed in the command list in the macros "DrawExitInkMode" but I can't seem to do anyting with it. all the button are grayed out.
Anybody know what I need to do?
Thanks,
Jason