La ricerca ha trovato 4016 risultati
- sabato 11 maggio 2024, 12:30
- Forum: Macro e UNO API
- Argomento: UNO java - HelloWorld
- Risposte: 4
- Visite : 27
- sabato 11 maggio 2024, 9:18
- Forum: Macro e UNO API
- Argomento: UNO java - HelloWorld
- Risposte: 4
- Visite : 27
Re: UNO java - HelloWorld
Conosci già il java ? altrimenti ti conviene iniziare col basic, l'apprendimento è molto più rapido e trovi più utenti in grado di aiutarti.
- giovedì 9 maggio 2024, 10:24
- Forum: Calc
- Argomento: [Risolto]Salvare un PDF solo se una cella ha un valore
- Risposte: 2
- Visite : 46
Re: Salvare un PDF solo se una cella ha un valore
Il modo più semplice è far terminare la sub se la cella è vuota Sub SalvaPDF Dim Doc As Object Dim Sheet As Object Dim mFilterData(0) As New com.sun.star.beans.PropertyValue Doc = StarDesktop.CurrentComponent Sheet = Doc.Sheets.GetByIndex(4) If Sheet.getCellRangeByName("A1").String = "...
- mercoledì 3 aprile 2024, 12:31
- Forum: Calc
- Argomento: [Risolto] "Comprimere" foglio con grafici
- Risposte: 6
- Visite : 267
Re: "Comprimere" foglio con grafici
Penso solo posizionando i grafici all'esterno delle righe da comprimere, però aspetta altri pareri.
- venerdì 22 marzo 2024, 15:53
- Forum: Macro e UNO API
- Argomento: Elenco Fogli
- Risposte: 25
- Visite : 832
- mercoledì 20 marzo 2024, 20:35
- Forum: Macro e UNO API
- Argomento: Elenco Fogli
- Risposte: 25
- Visite : 832
Re: Elenco Fogli
Grazie per il suggerimento, comunque non mi appare alcun menù in A1.
- mercoledì 20 marzo 2024, 16:03
- Forum: Macro e UNO API
- Argomento: Elenco Fogli
- Risposte: 25
- Visite : 832
Re: Elenco Fogli
A me non funziona con Libre e non ricordo più come si fa ad impostare l'avvio macro all'apertura del documento.
- venerdì 15 marzo 2024, 10:08
- Forum: Calc
- Argomento: Trasformare un risultato nella sua formula di calcolo e viceversa
- Risposte: 9
- Visite : 431
Re: Trasformare un risultato nella sua formula di calcolo e viceversa
Che senso ha proteggere un file di esempio su cui gli altri dovrebbero lavorare ?
- giovedì 14 marzo 2024, 11:08
- Forum: Macro e UNO API
- Argomento: [Risolto]Esportare range in file csv
- Risposte: 25
- Visite : 658
Re: Esportare range in file csv
L'ho fatto io cliccando sul punto esclamativo
- mercoledì 13 marzo 2024, 20:38
- Forum: Macro e UNO API
- Argomento: [Risolto]Esportare range in file csv
- Risposte: 25
- Visite : 658
Re: Esportare range in file csv
Non so aiutarti, chiedi all'amministratore Charlie di spostare la discussione nella sezione Macro e UNO API, che è frequentata da esperti
- sabato 9 marzo 2024, 12:24
- Forum: Macro e UNO API
- Argomento: [Risolto]Esportare range in file csv
- Risposte: 25
- Visite : 658
Re: Esportare range in file csv
non c'è modo di poter esportare più di sole 2 celle e non tutto il foglio? Un range non è fatto soltanto da 2 celle, ma da tutte le celle comprese tra le due indicate nel range, quindi quando scrivo B5:C9 sono comprese tutte le celle tra i 2 estremi. Allega un esempio realistico di quello che ti se...
- venerdì 8 marzo 2024, 17:50
- Forum: Macro e UNO API
- Argomento: [Risolto]Esportare range in file csv
- Risposte: 25
- Visite : 658
Re: Esportare range in file csv
Ma a cosa ti serve ? non capisco, comunque funziona soltanto con un range tipo B5:C9, altrimenti prova questa che esporta tutto il contenuto del foglio sub Main dim document as object dim dispatcher as object document = ThisComponent.CurrentController.Frame dispatcher = createUnoService("com.su...
- venerdì 8 marzo 2024, 16:35
- Forum: Macro e UNO API
- Argomento: [Risolto]Esportare range in file csv
- Risposte: 25
- Visite : 658
Re: Esportare range in file csv
Prova così Sub CreateCSVFile oSheet = ThisComponent.getCurrentController.ActiveSheet srange = "B5:B7" oRange = oSheet.getCellRangeByName(srange) CellContentArray = oRange.getDataArray() sFileName = "C:\Users\Ferro\Desktop\prova.csv" '<<<<<<<<<<<<<<<< modificare n = FreeFile() Ope...
- venerdì 8 marzo 2024, 15:24
- Forum: Macro e UNO API
- Argomento: [Risolto]Esportare range in file csv
- Risposte: 25
- Visite : 658
Re: Esportare range in file csv
Che senso ha esportare una sola cella ? non capisco.
- giovedì 7 marzo 2024, 10:38
- Forum: Calc
- Argomento: [Risolto] Creazione automatica fogli da elenco
- Risposte: 3
- Visite : 192
Re: Creazione automatica fogli da elenco
Ciao, occorre una macro come questa
Codice: Seleziona tutto
Sub CreaFogli
Doc= ThisComponent
nfogli = 2 ' da modificare
for r = 1 to nfogli
nomefoglio = Doc.Sheets(0).GetCellbyPosition( 1, r ).string
If not Doc.Sheets.hasbyName(nomefoglio) Then Doc.Sheets.insertNewByName(nomefoglio,Doc.Sheets.Count)
next
End Sub
- giovedì 7 marzo 2024, 10:38
- Forum: Calc
- Argomento: [Risolto] Creazione automatica fogli da elenco
- Risposte: 3
- Visite : 192
Re: Creazione automatica fogli da elenco
Ciao, occorre una macro come questa
Sub CreaFogli
Doc= ThisComponent
nfogli = 2 ' da modificare
for r = 1 to nfogli
nomefoglio = Doc.Sheets(0).GetCellbyPosition( 1, r ).string
If not Doc.Sheets.hasbyName(nomefoglio) Then Doc.Sheets.insertNewByName(nomefoglio,Doc.Sheets.Count)
next
End Sub
Sub CreaFogli
Doc= ThisComponent
nfogli = 2 ' da modificare
for r = 1 to nfogli
nomefoglio = Doc.Sheets(0).GetCellbyPosition( 1, r ).string
If not Doc.Sheets.hasbyName(nomefoglio) Then Doc.Sheets.insertNewByName(nomefoglio,Doc.Sheets.Count)
next
End Sub
- lunedì 4 marzo 2024, 16:24
- Forum: Macro e UNO API
- Argomento: Elenco Fogli
- Risposte: 25
- Visite : 832
Re: Elenco Fogli
A questo punto semplificherei ancora di più sfruttando gli eventi Function ElencoNomiFogli() ElencoNomiFogli() = ThisComponent.Sheets.getElementNames() End Function Sub evento(Target) If NOT Target.supportsService("com.sun.star.sheet.SheetCell") then exit sub Sh = Target.getSpreadsheet() r...
- domenica 3 marzo 2024, 11:46
- Forum: Macro e UNO API
- Argomento: Elenco Fogli
- Risposte: 25
- Visite : 832
Re: Elenco Fogli
Complimenti Geo, non sapevo che fosse possibile inserire una function in validità.
- sabato 2 marzo 2024, 11:54
- Forum: Macro e UNO API
- Argomento: Elenco Fogli
- Risposte: 25
- Visite : 832
Re: Elenco Fogli
Soluzione non elegante, ma semplice e efficace.
- mercoledì 24 gennaio 2024, 12:32
- Forum: Calc
- Argomento: [Risolto] Eseguire macro al cambiamento di una cella qualsiasi e/o Attivazione della casello di controllo
- Risposte: 2
- Visite : 215
Re: Eseguire macro al cambiamento di una cella qualsiasi e/o Attivazione della casello di controllo
Clic destro sul nome del Foglio (barra inferiore), eventi Foglio, Contenuto Modificato, scegli la macro.
allego esempio
allego esempio
- sabato 20 gennaio 2024, 9:47
- Forum: Calc
- Argomento: Calcolo numero di file in una cartella
- Risposte: 3
- Visite : 268
Re: Calcolo numero di file in una cartella
il numero dei file calc presenti in una cartella Per cartella intendi una directory del disco ? perché tutti quei fogli nel file allegato ? Per contare i file di una cartella puoi usare questo codice di esempio Sub NumFiles_InFolder Doc = ThisComponent sPath ="C:\Download\" sFileName = Di...
- sabato 6 gennaio 2024, 11:23
- Forum: Calc
- Argomento: Celle con più valori
- Risposte: 3
- Visite : 283
Re: Celle con più valori
I menù a tendina hanno bisogno di una colonna di appoggio in cui sono inseriti i dati, quindi quello che chiedi tu è fattibile, però i dati devono essere inseriti in una tabella a parte e quella principale serve soltanto per la visualizzazione.
- venerdì 5 gennaio 2024, 12:29
- Forum: Calc
- Argomento: Celle con più valori
- Risposte: 3
- Visite : 283
Re: Celle con più valori
A me sembra troppo complicato quello che vorresti fare, ti propongo questa disposizione
- martedì 28 novembre 2023, 11:13
- Forum: Calc
- Argomento: [Risolto] Pulsante attiva/disattiva evento "selezione modificata" del Foglio
- Risposte: 11
- Visite : 587
Re: Pulsante attiva/disattiva evento "selezione modificata" del Foglio
Non credo si possa fare, ma se riesci a trovare una soluzione sei pregato di condividerla.
- domenica 19 novembre 2023, 17:54
- Forum: Macro e UNO API
- Argomento: [Risolto] Assegnare istruzioni a un pulsante creato in una "Finestra di dialogo": come?
- Risposte: 5
- Visite : 494
Re: Assegnare istruzioni a un pulsante creato in una "Finestra di dialogo": come?
Io comincerei dall'inizio, quindi senza creare finestre di dialogo, ma creando una macro e assegnandola ad un pulsante situato sul foglio.
Le finestre di dialogo (userform in vba) verranno più tardi quando avrai più esperienza.
Se ho frainteso, allega un file di esempio con quello che hai fatto.
Le finestre di dialogo (userform in vba) verranno più tardi quando avrai più esperienza.
Se ho frainteso, allega un file di esempio con quello che hai fatto.
- venerdì 17 novembre 2023, 7:02
- Forum: Macro e UNO API
- Argomento: [Risolto] Visual Basic for Applications (VBA) e OpenOffice Basic: è possibile una "conciliazione-mediazione"?
- Risposte: 6
- Visite : 661
Re: Visual Basic for Applications (VBA) e OpenOffice Basic: è possibile una "conciliazione-mediazione"?
http://www.pitonyak.org/oo.php
Qui troverai molti esempi di programmazione
Qui troverai molti esempi di programmazione
- sabato 23 settembre 2023, 21:12
- Forum: Calc
- Argomento: Macro PDF>Calc per "saltare" finestra di Incolla Spec.
- Risposte: 4
- Visite : 715
Re: Macro PDF>Calc per "saltare" finestra di Incolla Spec.
Hai provato ad usare il registratore di macro ?
- lunedì 18 settembre 2023, 7:21
- Forum: Calc
- Argomento: Unire 2 file e cancellare i doppioni
- Risposte: 13
- Visite : 872
Re: Unire 2 file e cancellare i doppioni
Evidentemente facciamo 2 procedure diverse, io seleziono la prima cella della riga col titolo e poi Dati, Ordina.
Nel campo colonna mi compare TITOLO.
Nel campo colonna mi compare TITOLO.
- domenica 17 settembre 2023, 18:52
- Forum: Calc
- Argomento: Unire 2 file e cancellare i doppioni
- Risposte: 13
- Visite : 872
Re: Unire 2 file e cancellare i doppioni
Non so risponderti, io seleziono sempre la prima cella della riga col titolo per fare l'ordinamento.
- domenica 17 settembre 2023, 9:16
- Forum: Calc
- Argomento: Unire 2 file e cancellare i doppioni
- Risposte: 13
- Visite : 872
Re: Unire 2 file e cancellare i doppioni
Prova anche questa, ma prima di lanciarla fai l'ordinamento in base alla colonna A Sub Eliminadoppie oSheet = ThisComponent.Sheets(0) col=0 ' colonna A RIGA=1 Do If oSheet.getCellByPosition(3,RIGA).string <> "" Then if StrComp(oSheet.getCellByPosition(col,RIGA).string,oSheet.getCellByPosit...