Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Scoprire nascondere foglio di lavoro con cella colorata

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Scoprire nascondere foglio di lavoro con cella colorata

Postdi BG66 » 29/01/18 06:26

Ciao a tutti,
nel forum ho trovato riferimenti a calcoli legati al colore delle celle ma la mia necessità è leggermente differente.
Io vorrei che la macro :
1) scoprisse il foglio di lavoro "Attestato" se la cella "A2" si popola con la scritta TEST SUPERATO e si colora di verde.
2) tenga nascosto il foglio di cui sopra quando sia la cella "A2" che "H2" sono colorate. Idem quando è solo "H2". Avvisando l'utente con Msgbox " Test non superato!"

Grazie per l'aiuto.
https://www.dropbox.com/s/zs4deznj72uaucf/test%20colorato.xlsm?dl=0
BG66
Excel2010
Avatar utente
BG66
Utente Senior
 
Post: 252
Iscritto il: 20/08/16 07:44

Sponsor
 

Re: Scoprire nascondere foglio di lavoro con cella colorata

Postdi Anthony47 » 29/01/18 11:50

Dal file non si capisce quali eventi generano le condizioni su cui bisogna scoprire il foglio Attestato (non ci sono formule, non ci sono macro, non c'e' formattazione condizionale).
Quanto alla condizione 2, devo dedurre che nella situazione illustrata nel file pubblicato (A2=Test superato, in Verde; H2=Errate, in Arancione) il foglio e' da tenere nascosto?

Al momento potrei suggerire di non nascondere "Attestato" e inserire una sua macro di Worksheet_Activate, del tipo
Codice: Seleziona tutto
Private Sub Worksheet_Activate()
'
If Foglio1.Range("A2").Value = "TEST SUPERATO" And _
   Foglio1.Range("A2").Interior.ColorIndex = 4 And _
   Foglio1.Range("H2").Interior.ColorIndex = xlNone Then
   MsgBox ("Test Superato")
Else
    Foglio1.Activate
End If
'
End Sub

Oppure, ma questo dipende dalla struttura complessiva del file, si puo' inserire il codice come Sub Worksheet_Deactivate sul foglio Test; in questo caso si impedisce l'uscita dal foglio Test verso qualsiasi altra destinazione.

Se invece chiarisci quali eventi generano e condizioni da monitorare (una macro, una digitazione, ???) allora si puo' anche vedere di lavorare come dicevi tu.

Edit: noto ora lo strano modo di usare il "codename" dei fogli; es
Codice: Seleziona tutto
Foglio2("Attestato").Visible = False
Ma ti funziona? perche' per me la sintassi corretta e'
Codice: Seleziona tutto
Foglio2.Visible = False

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 17441
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Scoprire nascondere foglio di lavoro con cella colorata

Postdi BG66 » 29/01/18 14:29

Ciao Anthony,
confermo che quella postata è la versione light.

Immagine

In breve, dopo aver risposto alle domande con il tasto "correggi" verifico il tutto e se ok (Test superato in verde) "scopro" il foglio ATTESTATO se non ok -> messaggio ad hoc.

Comunque a prima vista, credo che i tuoi suggerimenti possano bastarmi come spunto.
Nel caso....chiedo :oops:

A presto per aggiornamenti.

Grazie ancora.

PS: In merito al visible ovviamente hai ragione. Avevo corretto il master ma non il light!!!
BG66
Excel2010
Avatar utente
BG66
Utente Senior
 
Post: 252
Iscritto il: 20/08/16 07:44


Torna a Applicazioni Office Windows


Topic correlati a "Scoprire nascondere foglio di lavoro con cella colorata":


Chi c’è in linea

Visitano il forum: Nessuno e 57 ospiti