AuthenticRange.PerformAction

www.altova.com Imprimer cette rubrique Page précédente Un niveau supérieur Page suivante

Accueil >  Programmers' Reference > Application API > Interfaces > AuthenticRange >

AuthenticRange.PerformAction

See also

 

Method: PerformAction (eAction as SPYAuthenticActions, strElementName as String) as Boolean

 

Description

PerformAction and its related methods, give access to the entry-helper functions of Authentic. This function allows easy and consistent modification of the document content without a need to know exactly where the modification will take place. The beginning  of the range object is used to locate the next valid location where the specified action can be performed. If no such location can be found, the method returns False. Otherwise, the document gets modified and the range points to the beginning of the modification.

 

HINT: To find out element names that can be passed as the second parameter use CanPerformActionWith.

 

Errors


2001

The authentic range object, or its related view object is no longer valid.


2005

Invalid address for the return parameter was specified.


2007

Invalid action was specified.

 

Examples

' --------------------------------------------

' Scripting environment - VBScript

' Insert the innermost element

' --------------------------------------------

Dim objRange

' we assume that the active document is open in authentic view mode

Set objRange = Application.ActiveDocument.AuthenticView.Selection

 

' we determine the elements that can be inserted at the current position

Dim arrElements()

objRange.CanPerformActionWith spyAuthenticInsertBefore, arrElements

 

' we insert the first (innermost) element

If UBound(arrElements) >= 0 Then

 objRange.PerformAction spyAuthenticInsertBefore, arrElements(0)

 ' objRange now points to the beginning of the inserted element

 ' we set a default value and position at its end

 objRange.Text = "Hello"

 objRange.ExpandTo(spyAuthenticTag).CollapsToEnd().Select

Else

 MsgBox "Can't insert any elements at current position"

End If


© 2019 Altova GmbH