[excel] Cancellare con comando VB determinate celle a sfndo giallo e contarne altre a sfondo rosso per ogni riga

[freetom]

Ciao,
dovresti farcela così:

Private Sub CommandButton1_Click()
   
   Set area = Range("a1:e10")
   giallo = RGB(255, 255, 0)
   rosso = RGB(255, 0, 0)
   
   counter = 0
   ultima_colonna = area.Column + 4
   
   For Each cella In area
      If cella.Interior.Color = giallo Then
         cella.Clear
      Else
         If cella.Interior.Color = rosso Then
            counter = counter + 1
         End If
      End If
      If cella.Column = ultima_colonna And counter > 0 Then
         Cells(cella.Row, ultima_colonna + 1) = counter
         counter = 0
      End If
   Next
End Sub

Devi solo inserire nelle prime tre righe il range di dati da esaminare (escludendo la colonna delle date, solo le cinque colonne di numeri), e poi la composizione RGB del giallo e del rosso che usi in modo che possano essere riconosciuti.

Riguardo al range puoi anche indicarne uno più lungo, in alto o in basso, di quello reale in modo che possa gestire diverse quantità di dati senza dover ogni volta aggiornare il codice.

La composizione RGB la trovi facilmente sullo stesso excel selezionando la freccetta dell'icona "colore riempimento" e poi andando su "altri colori" e su "personalizzati".

Grazie 1000 grandissimo!
Lo script cancella esattamente tutte le celle con sfondo giallo... solo che siccome inizialmente sono necessariamente tutte gialle... e solo successivamente con la funzione "formattazione condizionale" trova duplicati alcune di queste divengono rosse ma forse sotto.. conservano... anche il giallo... quando clicco sul bottone apposito mi vengono cancellate tutte senza distinzione... come posso ovviare a questo mio piccolo dilemma? Grazie ancora mito ciao

[NonCeLaFaccio+]

Grazie 1000 grandissimo!
Lo script cancella esattamente tutte le celle con sfondo giallo... solo che siccome inizialmente sono necessariamente tutte gialle... e solo successivamente con la funzione "formattazione condizionale" trova duplicati alcune di queste divengono rosse ma forse sotto.. conservano... anche il giallo... quando clicco sul bottone apposito mi vengono cancellate tutte senza distinzione... come posso ovviare a questo mio piccolo dilemma? Grazie ancora mito ciao

Sì, hai ragione, ho fatto una prova e il problema è proprio quello, praticamente la formattazione condizionale attiva una proprietà diversa da Interior.Color quindi è come se la cella avesse due colori, quello di fondo e quello condizionale e il mio codice va a interrogare quello di fondo.

Il problema è che non so come interrogare l'altro e in questi giorni non ho tempo di studiare la cosa perché sto cambiando lavoro e in ufficio non ho un attimo libero quindi dovrai aspettare un po', sorry, oppure speriamo che qualcun'altro sappia come fare.

A presto.
Ciao