Página 1 de 1

[Resuelto]Cambiar color de caracteres dentro de cua de texto

Publicado: Mar Feb 02, 2021 1:18 am
por jjcastillo.7
Buenas, necesito ayuda para algunas cosas:
1. Una macro en la cual pulse un botón y los caracteres que estan dentro del cuadro de texto cambien de color, en mi caso quiero que tomen el color del fondo del cuadro de texto.

2.Como encuentro todos los procedimientos y métodos que pertenecen a un control y su descripción, intento aprender hacer macros.

Re: Cambiar color de caracteres dentro de cuadro de texto

Publicado: Mar Feb 02, 2021 4:06 am
por FJCC-ES
1. Si un documento de Writer contiene un cuadro de texto con el nombre Text Box 1, esta macro cambia el color del texto al color del fondo del cuadro de texto o, si el fondo no tiene color, cambia el color del texto a blanco.

Código: Seleccionar todo

oDP = ThisComponent.DrawPage
oForms = oDP.getForms()
oForm = oForms.getByIndex(0)
oCuadroTexto = oForm.getByName("Text Box 1")
ColorFondo = oCuadroTexto.BackgroundColor
If Not IsEmpty(ColorFondo) Then
  oCuadroTexto.TextColor = ColorFondo
Else
  oCuadroTexto.TextColor = RGB(255,255,255)
End If
2. Uso MRI para ver las propiedades y métodos de los objectos en macros.

Re: Cambiar color de caracteres dentro de cuadro de texto

Publicado: Mar Feb 02, 2021 1:27 pm
por jjcastillo.7
Gracias tratare de adaptar la macro a Base.

[Resuelto]

Publicado: Dom Mar 07, 2021 8:28 pm
por jjcastillo.7
Gracias me funciono.