Crea intervalli denominati dalle etichette

From The Document Foundation Wiki
< Macros‎ | Calc
Jump to navigation Jump to search
This page is a translated version of the page Macros/Calc/ba021 and the translation is 100% complete.
Other languages:
English • ‎italiano

Questa pagina fornisce una procedura macro di LibreOffice Basic che crea intervalli denominati dalle etichette. È un esempio tratto dal Capitolo 13 ("Calc come database") della Guida 7.0 Calc.

Descrizione

Oltre a utilizzare la finestra di dialogo Crea nomi (accessibile selezionando Foglio > Intervalli ed espressioni con nome > Crea nella barra dei menu), gli intervalli con nome possono essere generati dalle etichette utilizzando il metodo macro addNewFromTitles:

addNewFromTitles(Sorgente, Bordo)
Crea intervalli denominati dalle intestazioni di colonna o riga. Questo metodo ha due argomenti:
  • Sorgente – L'indirizzo dell'intervallo di celle dell'intervallo denominato da creare.
  • Bordo – È un valore di enumerazione che specifica la posizione delle etichette di intestazione. Questa enumerazione ha uno dei quattro possibili valori, elencati nella tabella seguente:
com.sun.star.sheet.Border valori di enumerazione
Enumeratore Descrizione
TOP Selezionate la riga del bordo superiore.
BOTTOM Selezionate la riga del bordo inferiore.
RIGHT Selezionate la colonna del bordo destro.
LEFT Selezionate la colonna del bordo sinistro.


Tip.svg

Tip:
Per generare nomi da più bordi, dovete chiamare addNewFromTitles per ogni riga o colonna di intestazione che desiderate utilizzare.


Tip.svg

Tip:
Evitate di assegnare a più righe o colonne la stessa etichetta, poiché anche gli intervalli generati da esse condivideranno lo stesso nome e potrebbero finire per essere sovrascritti da Calc.


La macro seguente crea tre intervalli denominati utilizzando le intestazioni della riga superiore dell'intervallo di celle A1:C20. Gli intervalli risultanti verranno elencati nella finestra di dialogo Gestisci nomi, a cui è possibile accedere selezionando Foglio > Intervalli ed espressioni con nome > Gestisci nella barra dei menu o premendo Ctrl+F3.

Codice

 1Sub AddManyNamedRanges()
 2  Dim oSheet    'Foglio che contiene l'intervallo nominato.
 3  Dim oAddress  'Indirizzo dell'intervallo.
 4  Dim oRanges   'La proprietà NamedRanges.
 5  Dim oRange    'Gamma di celle singole.
 6
 7  oRanges = ThisComponent.NamedRanges
 8  oSheet = ThisComponent.getSheets().getByIndex(0)
 9
10  oRange = oSheet.getCellRangeByName("A1:C20")
11  oAddress = oRange.getRangeAddress()
12  oRanges.addNewFromTitles(oAddress, com.sun.star.sheet.Border.TOP)
13End Sub

Questo Foglio di calcolo Calc contiene il codice sovrastante in Basic di LibreOffice.