Macro clic del mouse [Risolto]

Discussioni sull'applicazione per i fogli di calcolo
Rispondi
solari77
Messaggi: 18
Iscritto il: domenica 13 giugno 2021, 10:59

Macro clic del mouse [Risolto]

Messaggio da solari77 »

Ciao a tutti, sono nuovo del forum .
Avrei un piccolo problema.
Ho un File Excel con macro. Ora ho deciso di passare a LibreOffice.
Nel file Excel la macro era una semplicissima istruzione che avveniva al Worksheet_SelectionChange.
Non faceva altro che cliccando con il mouse su una cella, se c'era scritto il numero 2 lo cambiava nel numero 3.
Ora dopo aver aperto il file con LibreOffice, la macro c'è però non viene eseguita. Sicuramente nell'importazione qualcosa non è andato.
La mia domanda molto semplicemente è : come scrivo la macro che mi cambia il valore di una cella al clic del mouse ?
Ringrazio tutti in anticipo.
Saluti
Ultima modifica di solari77 il giovedì 8 luglio 2021, 14:22, modificato 1 volta in totale.
OpenOffice 3.1 su Windows Vista
Avatar utente
charlie
Site Admin
Site Admin
Messaggi: 8786
Iscritto il: mercoledì 19 dicembre 2012, 10:50
Contatta:

Re: Macro clic del mouse

Messaggio da charlie »

Ciao e benvenuto sul forum.
Se intanto ti vuoi presentare, farai cosa gradita. Puoi farlo in questa sezione -> viewforum.php?f=16

L’utente che apre un quesito si impegna: In caso di inosservanza saremo costretti ad azioni di “richiamo”, sospensione o chiusura del profilo utente.

Buon proseguimento.
charlie
macOS 14.3 Sonoma: Open Office 4.1.15 - LibreOffice 7.5.7.2
http://www.charlieopenoffice.altervista.org
patel
Volontario attivo
Volontario attivo
Messaggi: 4019
Iscritto il: venerdì 30 aprile 2010, 8:04
Località: Livorno

Re: Macro clic del mouse

Messaggio da patel »

il linguaggio macro di Libre è completamente diverso dal VBA, solamente macro semplici in vba funzionano, quelle relative ad eventi no. Ti consiglio di leggere http://www.pitonyak.org/oo.php.
Allego esempio
Allegati
EventoChange.ods
(11.53 KiB) Scaricato 84 volte
-------------------
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
Avatar utente
lucky63
Volontario assiduo
Volontario assiduo
Messaggi: 2992
Iscritto il: martedì 18 maggio 2010, 17:01

Re: Macro clic del mouse

Messaggio da lucky63 »

.
Segnalo a @Charlie questo Link.
solari77 ha scritto:Non faceva altro che cliccando con il mouse su una cella, se c'era scritto il numero 2 lo cambiava nel numero 3.
Su qualsiasi cella o unicamente su un area o cella specifica ?
solari77 ha scritto:La mia domanda molto semplicemente è : come scrivo la macro che mi cambia il valore di una cella al clic del mouse ?
Su qualsiasi cella o unicamente su un area o cella specifica ?
Solo se contiene il valore 2 deve diventare 3 ?
Altro ?
solari77
Messaggi: 18
Iscritto il: domenica 13 giugno 2021, 10:59

Re: Macro clic del mouse

Messaggio da solari77 »

lucky63 ha scritto: Su qualsiasi cella o unicamente su un area o cella specifica ?
Nel mio caso è per un intervallo specifico di celle
lucky63 ha scritto: Solo se contiene il valore 2 deve diventare 3 ?
Esatto
OpenOffice 3.1 su Windows Vista
Avatar utente
lucky63
Volontario assiduo
Volontario assiduo
Messaggi: 2992
Iscritto il: martedì 18 maggio 2010, 17:01

Re: Macro clic del mouse

Messaggio da lucky63 »

.
Una possibile soluzione ("abbastanza semplice e comprensibile") ...

Codice: Seleziona tutto

Sub CambiaValoreDa2a3AllaCellaSelezionataNelRangeB3C9
Rem Link del quesito: https://forum.openoffice.org/it/forum/viewtopic.php?f=9&t=11273
Rem Esempio di macro da collegare all'evento foglio "Selezione modificata"
Rem Click Destro su etichetta del NomeFoglio > Foglio eventi > Selezione modificata > ...
Rem La macro funziona anche se la selezione della cella viene fatta da tastiera.
On error goto Esci
Doc = ThisComponent
CellaAttiva  = Doc.getCurrentSelection
Colonna = CellaAttiva.cellAddress.Column
Riga    = CellaAttiva.cellAddress.Row
Rem Cella A1 corrisponde a Colonna0 Riga0
Rem Se cursore fuori dal range B3:C9 esci
If Colonna < 1 Or Colonna > 2 Or Riga < 2 Or Riga > 8 Then exit sub
Rem Se la CellaAttiva ha valore diverso da 2 esci
If CellaAttiva.Value <> 2 Then exit sub
Rem Assegna il valore 3 alla cella attiva
CellaAttiva.Value = 3
Esci:
End Sub
Allegati
Test - Macro - CambiaValoreDa2a3AllaCellaSelezionataNelRangeB3C9.ods
(13.6 KiB) Scaricato 80 volte
Avatar utente
charlie
Site Admin
Site Admin
Messaggi: 8786
Iscritto il: mercoledì 19 dicembre 2012, 10:50
Contatta:

Re: Macro clic del mouse

Messaggio da charlie »

lucky63 ha scritto:Segnalo a @Charlie questo Link.
Da "Istruzioni per nuovi arrivati":
Crossposting: non postate contemporaneamente lo stesso argomento su questo e su altri forum, è considerato uno sgarbo. Se non siete soddisfatti delle risposte ricevute, mettete almeno un link che segnali il crossposting.
charlie
macOS 14.3 Sonoma: Open Office 4.1.15 - LibreOffice 7.5.7.2
http://www.charlieopenoffice.altervista.org
solari77
Messaggi: 18
Iscritto il: domenica 13 giugno 2021, 10:59

Re: Macro clic del mouse

Messaggio da solari77 »

Grazie a lucky63, provo.

Riguardo al link sull'altro forum vorrei solo precisare che dall'altra parte non ho ricevuto nessuna risposta.non credo sia uno "sgarbo" postare anche qui.
Cmq messaggio recepito
OpenOffice 3.1 su Windows Vista
patel
Volontario attivo
Volontario attivo
Messaggi: 4019
Iscritto il: venerdì 30 aprile 2010, 8:04
Località: Livorno

Re: Macro clic del mouse

Messaggio da patel »

qui hai avuto risposte, una anche da me, ma non hai dato riscontro
-------------------
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
solari77
Messaggi: 18
Iscritto il: domenica 13 giugno 2021, 10:59

Re: Macro clic del mouse

Messaggio da solari77 »

Si hai perfettamente ragione qui ho ricevuto risposte.
Però il post sull'altro forum è precedente a questo. non avendo ricevuto nessuna risposta, mi sono rivolto a voi, e dai qui ho ricevuto risposte, e ve ne sono grato.
Semmai l'altro forum potrebbe lamentare il crossposting.
Nessuno di voi è stato non considerato da parte mia.
Se scrivo da un'altra parte, e non ricevo risposta ,significa che non devo più chiedere ?Chiedo.
OpenOffice 3.1 su Windows Vista
patel
Volontario attivo
Volontario attivo
Messaggi: 4019
Iscritto il: venerdì 30 aprile 2010, 8:04
Località: Livorno

Re: Macro clic del mouse

Messaggio da patel »

Come ha detto il moderatore
Crossposting: non postate contemporaneamente lo stesso argomento su questo e su altri forum, è considerato uno sgarbo. Se non siete soddisfatti delle risposte ricevute, mettete almeno un link che segnali il crossposting.
-------------------
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
Avatar utente
charlie
Site Admin
Site Admin
Messaggi: 8786
Iscritto il: mercoledì 19 dicembre 2012, 10:50
Contatta:

Re: Macro clic del mouse

Messaggio da charlie »

Ok, consideriamo chiarito l'equivoco :D .
Ma a @Patel devi un riscontro sulla risposta che ti ha dato ;)
charlie
macOS 14.3 Sonoma: Open Office 4.1.15 - LibreOffice 7.5.7.2
http://www.charlieopenoffice.altervista.org
solari77
Messaggi: 18
Iscritto il: domenica 13 giugno 2021, 10:59

Re: Macro clic del mouse

Messaggio da solari77 »

Grazie a @patel e grazie a @lucky63 per le soluzioni proposte.
La soluzione di lucky63 è esattamente quello che serve a me .
Grazie
OpenOffice 3.1 su Windows Vista
Avatar utente
charlie
Site Admin
Site Admin
Messaggi: 8786
Iscritto il: mercoledì 19 dicembre 2012, 10:50
Contatta:

Re: Macro clic del mouse

Messaggio da charlie »

Sistema corretto per aggiungere [Risolto] viewtopic.php?f=2&t=5661
charlie
macOS 14.3 Sonoma: Open Office 4.1.15 - LibreOffice 7.5.7.2
http://www.charlieopenoffice.altervista.org
Rispondi