Pulsante controllo ...
 
Notifiche
Cancella tutti

La consultazione del forum è libera per tutti.

Per poter porre un quesito è invece necessario essere un utente registrato (clicca qui se non lo sei).

Tutti gli utenti che richiedono un supporto, come da REGOLAMENTO, sono caldamente invitati ad allegare un file di esempio con l'indicazione di quello che si desidera ottenere.

[Risolto] Pulsante controllo scadenze non funziona

7 Post
2 Utenti
0 Reactions
125 Visualizzazioni
Forum 1
(@monia320)
Post: 41
Trusted Member
Avviatore di Topic
 

Buongiorno, devo tenere traccia di piccole scorte di materiali e mi serve soprattutto sapere se un prodotto è scaduto.

Nel foglio chiamato IN SCADENZA la formattazione condizionale che mi colora la cella se un prodotto è scaduto funziona, non riesco però a far funzionare il pulsante CONTROLLO PRODOTTI SCADUTI (o meglio,  mi segnala che sono tutti  scaduti!). Dove ho sbagliato?

Vi ringrazio,

Monia

Versione di Excel
Sistema operativo
 
Postato : 10/10/2024 12:20
gianfranco55
(@gianfranco55)
Post: 1797
Moderatore
 

ciao

in J2 da tirare in basso

=SE(E($I$1>$H2;$H2>0);"SCADUTO";"")

in formattazione condizionale formule

=E($H2<=$I$1;$H2>0)

 

 
Postato : 10/10/2024 13:09
Forum 1
(@monia320)
Post: 41
Trusted Member
Avviatore di Topic
 

@gianfranco55

 

la formula 

=E($H2<=$I$1;$H2>0) va inserita nella formattazione condizionale della  colonna H ?

 

 
Postato : 10/10/2024 14:00
gianfranco55
(@gianfranco55)
Post: 1797
Moderatore
 

ciao

si in pratica sostituisci che hai già

e la applichi a

$H$2:$h$1000

 
Postato : 10/10/2024 14:09
Forum 1
(@monia320)
Post: 41
Trusted Member
Avviatore di Topic
 

@gianfranco55 

...il tasto "controllo scadenze" continua a darmi tutti scaduti 😱 non è che ho sbagliato qualcosa nella macro? 

 
Postato : 10/10/2024 14:20
gianfranco55
(@gianfranco55)
Post: 1797
Moderatore
 

No

se non metti la formula in J2 e la tiri in basso

ti renderà scaduto anche le celle vuote

ecco il motivo per cui la macro ti rende tutto.

=SE(E($I$1>$H2;$H2>0);"SCADUTO";"")

 

nel tuo file esempio non hai neanche un scaduto

al limite prova questo

Else
ListaRecordScaduti = Replace(ListaRecordScaduti & ", " & NumeroRecord, ", ", vbCrLf)
 
Postato : 10/10/2024 14:31
Forum 1
(@monia320)
Post: 41
Trusted Member
Avviatore di Topic
 

@gianfranco55 ok funziona!  Ti rigrazio 

Buona serata

Monia

 
Postato : 10/10/2024 16:53
Condividi:
My Agile Privacy
Questo sito utilizza cookie tecnici e di profilazione. Cliccando su accetta si autorizzano tutti i cookie di profilazione. Cliccando su rifiuta o la X si rifiutano tutti i cookie di profilazione. Cliccando su personalizza è possibile selezionare quali cookie di profilazione attivare.
Attenzione: alcune funzionalità di questa pagina potrebbero essere bloccate a seguito delle tue scelte privacy
     Scarica il nostro ebook gratuito     

Unisciti a oltre 35.000 professionisti
che hanno già scelto di semplificare il proprio lavoro
e aumentare la produttività con la nostra newsletter!

Scarica l’ebook con i
migliori trucchi e suggerimenti per Excel
selezionati per te da Excel Academy

Download