This example displays the Data Form dialog box if the active document is a mail merge document.
If ActiveDocument.MailMerge.State <> wdNormalDocument Then
ActiveDocument.DataForm
End If
This example creates a table in a new document and then displays the Data Form dialog box.
Set aDoc = Documents.Add
With aDoc
.Tables.Add Range:=aDoc.Content, NumRows:=2, NumColumns:=2
.Tables(1).Cell(1, 1).Range.Text = "Name"
.Tables(1).Cell(1, 2).Range.Text = "Age"
.DataForm
End With