Soy nuevo en este foro.
Había programado macros en VBasic para MS Word. Estoy intentando trasladarlas a Libre Office Writer.
En VBasic al seleccionar un texto podía conocer sus características modificarlas.
En OOoBasic no encuentro cómo hacerlo.
Pongo un ejemplo en VBasic:
Código: Seleccionar todo
REM ***** BASIC *****
Option Explicit
Sub CreceText()
Selection.WholeStory 'selecciona todo el texto
'puedo modificar las características de la tipografía,
'actuando sobre todo el texto; si hay distintas tipografías el atributo a modificar tiene
'que ser el mismo en todas ellas (si no, aparece mensaje de error)
' en este ejemplo el tamaño de la letra, que se incrementará cada vez que se ejecute la macro
With Selection.Font
.Name = ""
.Size = Selection.Font.Size + 2
.Scaling = 100
'puedo ofrecer mensajes al usuario ante determinados valores
If Selection.Font.Size = 48 Then
MsgBox "La letra parece ya demasiado grande"
ElseIf Selection.Font.Size = 8 Then
MsgBox "La letra parece ya demasiado "
End If
End With
End Sub
Gracias por adelantado,
Ambrosio