Ciao @charlie, letto l'argomento, provato a ragionare sulle macro scritte ... e risolto. Non ho idea se è la soluzione giusta, ma è una soluzione e direi che funziona. Nel file che allego, ho creato una funzione alla quale vengono passate le due date (inizio e fine periodo) prelevate dalle celle. Tr...

Un saluto al forum. Ho necessità, con macro, di confrontare se un determinato periodo, definito da data inizio e data fine, si sovrappone ad altri periodi esistenti, sempre definiti da data inizio e data fine. La verifica dovrà avvenire tra il periodo da verificare e tutti i periodi esistenti. -Peri...

@Gaetanopr
Scorrendo il tuo codice, ho visto che come prima cosa cancelli tutte le aree con nome eventualmente definite. Nel caso invece ne avessi bisogno, esiste la possibilità di mostrare nell'elenco solo i fogli?
Geo

Con una semplice finestra di dialogo.
Vedi allegato.
Geo

La soluzione di @patel sfrutta gli eventi ... del foglio (come da lui specificato). All'evento del foglio denominato "Contenuto modificato" è associata la macro che visualizza il foglio. L'elenco degli eventi lo trovi in "Foglio-> Eventi del foglio" . Quindi, oltre a copiare la c...

Ottimo patel.
... Prima o poi imparerò/capirò le query.
Saluti
Geo

Ciao @nickGiard, inizialmente ero partito da una funzione semplicissima Function ElencoNomiFogli() As variant ElencoNomiFogli() = ThisComponent.Sheets.getElementNames() End Function che riportava in elenco tutti i nomi dei fogli del documento. Mi sono poi fatto una domanda: e se in futuro voglio esc...

Una formula in validità l'avevo già vista, con una function ho provato e funziona.
Grazie @patel.
Saluti
Geo

Oppure impostando un menù a tendina in una cella con l'elenco dei fogli ed un pulsante per spostarsi. Vengono utilizzati due codici: una funzione per l'elenco dei fogli (validità dati) ed una sub per attivare il foglio desiderato. rem Funzione personalizzata per ottenere l'elenco dei nomi dei fogli ...

La funzione Inputbox accetta, nell'apposito campo, solamente stringhe semplici e non elenchi a discesa.
Pertanto, devi cambiare metodo; ad esempio puoi utilizzare una finestra di dialogo.
Geo

L'errore riportato è: del quale non ho idea del significato.
Geo

Un saluto al forum. Vorrei, come da titolo, installare estensioni utilizzando un codice. Questo è quanto ho scritto, ma che ovviamente mi da errore all'ultima riga: Sub AggiungiEstensione oExtensionManager = GetDefaultContext.getByName("/singletons/com.sun.star.deployment.ExtensionManager"...

Ok.
Saluti
Geo

Una soluzione possibile, è utilizzare VBA: Sheets("NomeFoglio").Select Range("RangeDiOrigine").Select Selection.Copy Range("CellaDiDestinazione").Select Selection.PasteSpecial Paste:=xlAll, Operation:=xlAdd, SkipBlanks:=False, Transpose:=False Non è una soluzione "...

Ciao @patel, secondo me, quanto chiedi, è possibile farlo utilizzando solamente con il codice da te postato. Il metodo pasteCellRange() faceva in linea di massima quello che chiedi, ma ora è deprecato e non più utilizzabile. L'unica alternativa è utilizzare getDataArray() e setDataArray() alle due m...

Soluzione molto interessante, spiegazione chiara ed esaustiva.
Visto l'intervento di @patel, persona avveduta e saggia nell'esprimere apprezzamenti, ritengo doveroso un ... Chapeau, @Attilafdd.
Saluti e grazie come sempre.
Geo

Ciao @Attilafdd,
perfetto e già adattata.
Mi puoi spiegare la formula? Non capisco Saluti
Geo

Un saluto al forum. Avrei necessità di visualizzare in una cella, con menù a tendina, l'elenco dei valori presenti in una matrice che soddisfano un requisito. Nello specifico, data una matrice di numeri, la cella con il menù a tendina dovrebbe elencarmi esclusivamente i numeri compresi tra 3,5 e 4,5...

1 - Non sono in grado di darti una spiegazione.
2 - A me non capita.
Saluti
Geo

Per ogni elemento (pulsante), OpenOffice determina un numero di proprietà maggiore rispetto LibreOffice, quindi il ciclo va in errore. La soluzione da me pensata: - non dimensionare la variabile "Proprieta()" in sede di dichiarazione: Dim Proprieta() As New com.sun.star.beans.PropertyValue...

Ho trovato un errore all'interno del primo ciclo Do/Loop While (rigo da 44 a 49). Sostituire If A(y).Name = "ResourceURL" Then URLToolBar = A(y).Value 'Print URLToolBar Trovata = True Exit For con If A(y).Name = "ResourceURL" Then URLToolBar = A(y).Value 'Print URLToolBar Trovata...

Un saluto al forum. se @unlucky83 ci ha passato alcune ore, io sono giorni che, nelle ore libere, ci provo e riprovo... Alla fine però, sono riuscito a nascondere (rendere non visibile) un pulsante, ma non a disabilitarlo che, ahimè, sarebbe stata la soluzione ottimale. Il codice è un po' lungo, per...

Un saluto a tutti. Scusate se mi accodo ad un problema già risolto, ma vorrei sapere se lo stesso risultato è possibile ottenerlo anche in ambiente GNU/Linux. Ho provato su LO il codice scritto da @patel e @Gaetanopr ma non funziona. All'istruzione " Set shell = CreateObject("shell.applica...

Oppure, nelle proprietà dell'Asse X, nella scheda Scala devi formattare l'asse come Testo ( "Tipo" = Testo ) - doppio click su di un grafico - doppio click su una data - nella finestra che si apre denominata "Asse X", nella scheda "Scala", come "Tipo" devi sel...

Grazie per il riscontro. Come avrai sicuramente già visto, per cambiare l'orario del prossimo aggiornamento, devi modificare l'istruzione OraNuovoAggiornamento = CDate(OraAttuale)+TimeValue("00:00:30") all'interno della Sub RangeDiCelleModificate_modified Quindi se imposti l'aggiornamento ...

Non so se è la procedura pensata da Gaetanopr, ma il risultato è simile.
Ho creato un listener associato al range di celle che vengono aggiornate. Ad ogni aggiornamento, viene scritto l'orario di esecuzione e l'orario del prossimo.
Spero che possa essere utile.
Saluti.
Geo

Al quesito originale, hai invece risposto pienamente.
Luka2017 ha successivamente "integrato" il quesito con una nuova richiesta.
Saluti
Geo

Ciao Luka2017, nella macro Sub Fitro_grid , sostituisci le righe For Each oCell in ranges.Cells Arr(x) = oCell.CellAddress.Row a(x) = oCell.DataArray(0) x = x +1 Next con For Each oCell in ranges.Cells Arr(x) = oCell.CellAddress.Row oRiga = Sheet.getRows.getByIndex(Arr(x)) a(x) = oRiga.DataArray(0) ...

Metto risolto, in quanto la soluzione proposta ha effettivamente risolto il problema posto. Per quanto riguarda la possibilità di utilizzare un solo processo di stampa, io non ho trovato la soluzione. La stampa ha sempre ordinato le tabelle per foglio e non per corpo, quindi Corpo1-Appezzamenti, Cor...

Funziona.
1) La soluzione prevede tanti processi di stampa quanti sono i fogli (tabelle), ma sarebbe stato possibile con un solo processo di stampa?
2) C'è una qualche motivazione particolare per avere usato il registratore per impostare l'area di stampa?
Saluti
Geo