Copiar el valor de un campo de texto a otro con una Macro en LibreOffice Writer

Continuando con las notas de LibreOffice Writer… ?

Cuando trabajamos con formularios extensos, es normal que algunos campos se repitan.

Imagina que tienes un campo de texto o text field para agregar el nombre.

Pero el campo «nombre» se repite en otros documentos.

Lo ideal sería no tener que llenar nuevamente los otros, si ya lo hicimos una vez.

Por suerte LibreOffice Writer te permite crear macros, para automatizar algunas tareas.

No entraré en detalles de ejecución de macros. (Lo dejo para otra nota).

Te comparto el código:

Sub Main

oForm = ThisComponent.Drawpage.Forms.getByName("formulario") 'Get Form'

oName = oForm.getByName("name")   'Get access to field'
oLastName = oForm.getByName("lastname")   'Get access to field'

oBusinessName = oForm.getByName("businessname")
oBusinessName.Text = oName.Text + " " + oLastName.Text

End Sub  

Explicación de la macro programada en Visual Basic, para copiar valores de un campo de texto a otro:

1) Primero, accedemos al formulario.
2) Accedemos al campo detexto «name».
3) Accedemos al campo de texto «lastname».
4) Accedemos al campo de nombre «businessname» y agregamos el nombre y apellido juntos.

Creo que el concepto se entiende bastante bien.

Puedes hacer lo mismo, en la misma macro con el resto de campos.

Si tienes alguna duda, puedes dejarla en los comentarios.

#HappyCoding