AuthenticRange.PerformAction
Método: PerformAction (eAction as SPYAuthenticActions, strElementName as String) as Boolean
Descripción
PerformAction y sus métodos ofrecen acceso a las funciones de los ayudantes de entrada de Authentic. Esta función permite modificar el contenido del documento de forma sencilla y coherente sin necesidad de saber dónde tienen lugar los cambios exactamente. El principio del objeto de intervalo se usa para encontrar la siguiente ubicación válida donde se puede llevar a cabo la acción indicada. Si dicha ubicación no se encuentra, el método devuelve False. De lo contrario, el documento se modifica y el intervalo apunta al principio de la modificación.
CONSEJO: utilice CanPerformActionWith para averiguar el nombre de los elementos que se pueden pasar como segundo parámetro.
Errores
2001 | El objeto de intervalo o su objeto relacionado ya no es válido. | |
2005 | La dirección indicada para el parámetro de devolución no es válida. | |
2007 | La acción indicada no es válida. |
Ejemplos
' --------------------------------------------
' VBScript
' Insertar el elemento más interior
' --------------------------------------------
Dim objRange
Set objRange = objPlugin.AuthenticView.Selection
' determinamos qué elementos se pueden insertar en la posición actual
Dim arrElements()
objRange.CanPerformActionWith spyAuthenticInsertBefore, arrElements
' insertamos el primer elemento (es decir, el más interior)
If UBound(arrElements) >= 0 Then
objRange.PerformAction spyAuthenticInsertBefore, arrElements(0)
' objRange ahora apunta al principio del elemento insertado
' establecemos un valor y una posición predeterminados en su final
objRange.Text = "Hello"
objRange.ExpandTo(spyAuthenticTag).CollapsToEnd().Select
Else
MsgBox "En la posición actual no se puede insertar ningún elemento"
End If