ActiveDocument Example
Sub Example_ActiveDocument()
' This example returns name of the CurrentDocument.
Dim activeDoc As AeccDocument
Set activeDoc = AeccApplication.ActiveDocument
MsgBox "The ActiveDocument is: " & activeDoc.Name, _
vbInformation, "ActiveDocument Example"
End Sub