[Risolto] Leggere il contenuto di una cella

Discussioni sull'applicazione per i fogli di calcolo
Rispondi
Nickfor2010
Messaggi: 8
Iscritto il: domenica 9 agosto 2020, 3:43

[Risolto] Leggere il contenuto di una cella

Messaggio da Nickfor2010 »

Buongiorno a tutti, premetto che ho cercato online e sul forum e non mi sembra di aver trovato risposta al mio quesito.

Vorrei creare una macro che:
- legga il contenuto (numero) della cella A1
- utilizzi questo dato in un processo If Then se il numero e' minore di 30 allora ROSSO se e' compreso tra 30 e 70 GIALLO e se e' maggiore di 70 VERDE
- stampi sulla cella A2 il risultato

non e' difficile, mi manca solo sapere come leggere la cella A1

grazie per eventuali risposte o suggerimenti
Ultima modifica di Nickfor2010 il lunedì 10 agosto 2020, 11:46, modificato 2 volte in totale.
openoffice 4.1.7 su windows 10
Avatar utente
charlie
Site Admin
Site Admin
Messaggi: 8803
Iscritto il: mercoledì 19 dicembre 2012, 10:50
Contatta:

Re: Leggere il contenuto di una cella

Messaggio da charlie »

Ciao e benvenuto/a 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.4.1 Sonoma: Open Office 4.1.15 - LibreOffice 7.5.7.2
http://www.charlieopenoffice.altervista.org
patel
Volontario attivo
Volontario attivo
Messaggi: 4020
Iscritto il: venerdì 30 aprile 2010, 8:04
Località: Livorno

Re: Leggere il contenuto di una cella

Messaggio da patel »

Codice: Seleziona tutto

Doc = ThisComponent
Sheet = Doc.Sheets(0) ' foglio 1
CellValue = Sheet.getCellRangeByName("A1").Value
-------------------
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
Nickfor2010
Messaggi: 8
Iscritto il: domenica 9 agosto 2020, 3:43

Re: [Risolto] Leggere il contenuto di una cella

Messaggio da Nickfor2010 »

Grazie per la celere risposta
openoffice 4.1.7 su windows 10
Rispondi