Impostare lo stile di una selezione multipla via macro

Creare una macro - Scrivere uno script - Usare le API
Rispondi
Arthas
Messaggi: 7
Iscritto il: martedì 3 dicembre 2013, 19:02

Impostare lo stile di una selezione multipla via macro

Messaggio da Arthas »

Salve, ho appena iniziato ad utilizzare le macro in OO Calc. Con questo codice posso impostare lo stile delle celle presenti nel range specificato nel codice:

Codice: Seleziona tutto

REM  *****  BASIC  *****
Option Explicit

Sub Main
oDoc = ThisComponent
osheets = odoc.getSheets()
osheet = osheets.getByIndex(0)
oCells = oSheet.getCellRangeByName("F13:F16")
NewBorder = oCells.BottomBorder
NewBorder.OuterLineWidth = 3
oCells.BottomBorder = NewBorder
End Sub
Come posso modificare questo codice in modo da poter definire lo stile delle celle che ho attualmente selezionato con il mouse, invece di specificarle nel codice?
So che lavorare con selezioni multiple è un po' complicato, e a tal proposito mi hanno consigliato questa guida: se voi la conoscete, riuscite a trovare qualcosa che faccia al caso mio?

Grazie in anticipo
OpenOffice 4.1.12 su Windows 10
patel
Volontario attivo
Volontario attivo
Messaggi: 4019
Iscritto il: venerdì 30 aprile 2010, 8:04
Località: Livorno

Re: Impostare lo stile di una selezione multipla via macro

Messaggio da patel »

oCells = oDoc.CurrentSelection
-------------------
Libre Office 7.5.3.2 su Windows 11
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta
Arthas
Messaggi: 7
Iscritto il: martedì 3 dicembre 2013, 19:02

Re: Impostare lo stile di una selezione multipla via macro

Messaggio da Arthas »

Funziona, grazie mille! Ho dovuto cancellare le righe

Codice: Seleziona tutto

oDoc = ThisComponent
osheets = odoc.getSheets()
perché restituivano un errore di Run Time che prima non appariva (come mai?)
Il codice funzionante è questo

Codice: Seleziona tutto

REM  *****  BASIC  *****
Option Explicit

Sub Main
oCells = ThisComponent.CurrentSelection
NewBorder = oCells.BottomBorder
NewBorder.OuterLineWidth = 3
oCells.BottomBorder = NewBorder
End Sub
Ultima modifica di Arthas il giovedì 23 giugno 2022, 23:09, modificato 2 volte in totale.
OpenOffice 4.1.12 su Windows 10
patel
Volontario attivo
Volontario attivo
Messaggi: 4019
Iscritto il: venerdì 30 aprile 2010, 8:04
Località: Livorno

Re: Impostare lo stile di una selezione multipla via macro

Messaggio da patel »

Non vedo l'uso della selezione che hai chiesto nel primo post.
-------------------
Libre Office 7.5.3.2 su Windows 11
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta
Arthas
Messaggi: 7
Iscritto il: martedì 3 dicembre 2013, 19:02

Re: Impostare lo stile di una selezione multipla via macro

Messaggio da Arthas »

patel ha scritto: giovedì 23 giugno 2022, 20:26 Non vedo l'uso della selezione che hai chiesto nel primo post.
Corretto!
OpenOffice 4.1.12 su Windows 10
Rispondi