Altova Authentic 2024 Desktop

Methode: SelectNext (eKind als SPYAuthenticElementKind) als AuthenticRange

 

Beschreibung

Wählt das Element vom Typ eKind nach dem aktuellen Ende des Bereichs aus. Die Methode gibt das geänderte Bereichsobjekt zurück.

 

Fehler

2001

Das Authentic-Bereichsobjekt oder das damit in Zusammenhang stehende Ansichtsobjekt ist nicht mehr gültig.

2003

Das Ziel liegt hinter dem Ende des Dokuments.

2005

Es wurde eine ungültige Elementart definiert.

Für den Rückgabeparameter wurde eine ungültige Adresse angegeben.

 

Beispiele

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

' Scripting environment - VBScript

' Scan through the whole document word-by-word

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

DimobjAuthenticView

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

SetobjAuthenticView = Application.ActiveDocument.AuthenticView

 

DimobjRange

SetobjRange = objAuthenticView.DocumentBegin

DimbEndOfDocument

bEndOfDocument = False

 

OnErrorResume Next

WhileNotbEndOfDocument

 objRange.SelectNext(spyAuthenticWord).Select

 If((Err.number - vbObjecterror) = 2003) Then

         bEndOfDocument = True

         Err.Clear

 ElseIf(Err.number <> 0) Then

         Err.Raise  ' forward error

 EndIf

Wend

 

© 2017-2023 Altova GmbH