Altova StyleVision 2025 Enterprise Edition

Method: SelectNext (eKind as SPYAuthenticElementKind) as AuthenticRange

 

Description

Selects the element of type eKind after the current end of the range. The method returns the modified range object.

 

Errors

2001

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

2003

Target lies after end of document.

2005

Invalid element kind specified.

Invalid address for the return parameter was specified.

 

Examples

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

' Scripting environment - VBScript

' Scan through the whole document word-by-word

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

Dim objAuthenticView

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

Set objAuthenticView = Application.ActiveDocument.AuthenticView

 

Dim objRange

Set objRange = objAuthenticView.DocumentBegin

Dim bEndOfDocument

bEndOfDocument = False

 

On Error Resume Next

While Not bEndOfDocument

 objRange.SelectNext(spyAuthenticWord).Select

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

         bEndOfDocument = True

         Err.Clear

 ElseIf (Err.number <> 0) Then

         Err.Raise  ' forward error

 End If

Wend

 

© 2018-2024 Altova GmbH