AuthenticRange.GotoNext

www.altova.com Imprimir este apartado Página anterior Subir un nivel Página siguiente

Inicio >  Referencia > Objetos > AuthenticRange >

AuthenticRange.GotoNext

Método: GotoNext (eKind as SPYAuthenticElementKind) as AuthenticRange

 

Descripción

Establece el intervalo en el principio del siguiente elemento de tipo eKind. El método devuelve el objeto de intervalo modificado.

 

Errores


2001

El objeto de intervalo o su objeto relacionado ya no es válido.


2003

El destino está después del final del documento.


2005

El tipo de elemento indicado no es válido.

La dirección indicada para el parámetro de devolución no es válida.

 

Ejemplos

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

'                VBScript

' Explorar todo el documento palabra por palabra

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

Dim objAuthenticView

Set objAuthenticView = objPlugin.AuthenticView

 

Dim objRange

Set objRange = objAuthenticView.DocumentBegin

Dim bEndOfDocument

bEndOfDocument = False

 

On Error Resume Next

While Not bEndOfDocument

 objRange.GotoNext(spyAuthenticWord).Select

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

         bEndOfDocument = True

         Err.Clear

 ElseIf (Err.number <> 0) Then

         Err.Raise ' error de reenvío

 End If

Wend

 


© 2019 Altova GmbH