View Single Post
 
Old 04-15-2013, 06:35 PM
fumei fumei is offline Windows 7 64bit Office XP
Expert
 
Join Date: Jan 2013
Posts: 440
fumei is on a distinguished road
Default

Try an OnExit macro like:
Code:
   
 
Sub If_Text()
Dim oTbl As Table
Set oTbl = Selection.Tables(1)
If ActiveDocument.FormFields("Text1").Result <> "" Then
   ActiveDocument.Unprotect
   oTbl.Rows.Add
   ActiveDocument.Protect _
        Type:=wdAllowOnlyFormFields, NoReset:=True
End If
End Sub
Reply With Quote