Risultati da 1 a 19 di 19

Discussione: Contare celle colorate



  1. #1
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Pistoia
    Età
    47
    Messaggi
    1072
    Versione Office
    Excel 2016
    Likes ricevuti
    19
    Likes dati
    15

    Contare celle colorate

    Ciao a tutti gli amici del forum

    Grazie ai video di Gerardo sulle Check box ho messo a punto un file con di presenze
    adesso però non riesco a trovare una formula che mi conta le celle che si colorano
    quando attivo una check box. mi spiego meglio......

    nella colonna N c'è le prime due check box A e B che quando le accendo
    evidenziano dei nomi.....

    Io vorrei N3 che si contasse le celle ce si colorano sia quando attivo A sia che attivo B

    e vuoto quando le check box sono spente

    e vorrei copiare questa formula da N3 a AL3

    Grazie a tutti per il solito aiuto
    File Allegati File Allegati
    windows 10
    Excel 2016

  2. #2
    L'avatar di Gerardo Zuccalà
    Clicca e Apri
    Data Registrazione
    May 2015
    Località
    Milano, Italy
    Età
    49
    Messaggi
    4916
    Versione Office
    2013
    Likes ricevuti
    1117
    Likes dati
    1126
    Ciao Nick bentornato
    Credo che qui la domanda è rivolta agli esperti del VBA io comunque ho trovato qualcosa nel web
    dagli una occhiata!
    Ciao


    http://www.andreaperotti.ch/apps/wor...rate-in-excel/

  3. #3
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Pistoia
    Età
    47
    Messaggi
    1072
    Versione Office
    Excel 2016
    Likes ricevuti
    19
    Likes dati
    15
    Grazie Gerardo proverò con il Vba ma la vedo dura
    o altrimenti provero un escamotage per contare le celle colorate per farlo con le formule

    grazie come al solito per aiuto
    windows 10
    Excel 2016

  4. #4
    L'avatar di Gerardo Zuccalà
    Clicca e Apri
    Data Registrazione
    May 2015
    Località
    Milano, Italy
    Età
    49
    Messaggi
    4916
    Versione Office
    2013
    Likes ricevuti
    1117
    Likes dati
    1126
    @Nick potresti fare un filtro per colore e poi subtotalizzare l'intervallo filtrato
    esempio posizionati nel database e richiama lo strumento filtro (CTRL+SHIFT+L) poi clicca su la freccettina del filtro>> filtra per colore>> scegli il colore
    Da un'altra parte del foglio metti una formula =SUBTOTALE(9;intervallo)
    fammi sapere!

  5. #5

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6811
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165
    Ciao Nick

    Solo a scopo "didattico" ti propongo una semplice Function che conta le celle con lo sfondo rosso

    Codice: 
    Function contarosse(rng as Range) as Long
    Dim cel as Range
    For Each cel in rng
         If cel.Interior.ColorIndex = 3 Then
              contarosse = contarosse + 1
         End If
    Next cel
    End Function
    Sul foglio di lavoro (dopo aver copiato la function in un modulo standard) basta scrivere

    =contarosse(intervallo)

    Alfredo

    P.S. Perdonate ma con l'iPad non sono riuscito ad inserire i tag code.
    Ultima modifica fatta da:scossa; 05/01/16 alle 17:00 Motivo: inserito tag CODE

  6. #6
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Pistoia
    Età
    47
    Messaggi
    1072
    Versione Office
    Excel 2016
    Likes ricevuti
    19
    Likes dati
    15
    a me andrebbe bene comunque contare le celle di qualsiasi colore.......
    perche attivo el chech box separatamente se poi invece sono attive insieme
    ancora meglio mi conta il totale
    grazie Alfredo
    provo e ti faccio sapere
    windows 10
    Excel 2016

  7. #7
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Pistoia
    Età
    47
    Messaggi
    1072
    Versione Office
    Excel 2016
    Likes ricevuti
    19
    Likes dati
    15
    Ciao Gerardo la formula funzionerebbe tutto facendo i filri per colore che fanno sparire tutto il resto delle righe
    ma non è molto pratico,
    vorrei che rimanesse il database cosi comè
    windows 10
    Excel 2016

  8. #8
    L'avatar di Gianfranco55
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Vicenza
    Età
    62
    Messaggi
    2076
    Versione Office
    2016
    Likes ricevuti
    553
    Likes dati
    117
    Ciao
    ho sentito gente piangere in aramaico
    perché vba non intercetta i colori se provengono da formattazione condizionale:188:
    O usi tutto VBA o per contare le celle usi il conta .se con la formula che utilizzi per la formattazione.
    altra possibilità è colorare le celle a mano............ma non penso sia veloce.

    ciao

  9. #9

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4024
    Versione Office
    2013
    Likes ricevuti
    1228
    Likes dati
    923
    Buonasera a tutti,
    ma non basterebbe usare una formula che tenga conto delle regole della formattazione condizionale?

    Esempio, nella cella N3 inserire questa formula:

    =SE(N40=VERO;MATR.SOMMA.PRODOTTO((N$4:N$33="x")*($D$4:$D$33="A"));0)+SE(N41=VERO;MATR.SOMMA.PRODOTTO((N$4:N$33="x")*($D$4:$D$33="B"));0)

    e dopo copiare la cella N3 a destra.

    Forse ho capito male io la richiesta :186:

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  10. I seguenti 2 utenti hanno dato un "Like" a cromagno per questo post:


  11. #10
    L'avatar di Gianfranco55
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Vicenza
    Età
    62
    Messaggi
    2076
    Versione Office
    2016
    Likes ricevuti
    553
    Likes dati
    117
    Ciao Cromagno
    non è che basterebbe:188:
    che mi risulti è una delle poche strade percorribili
    visto che VBA non intercetta la formattazione condizionale

  12. #11

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4024
    Versione Office
    2013
    Likes ricevuti
    1228
    Likes dati
    923
    Citazione Originariamente Scritto da Gianfranco55 Visualizza Messaggio
    Ciao Cromagno
    non è che basterebbe:188:
    che mi risulti è una delle poche strade percorribili
    visto che VBA non intercetta la formattazione condizionale
    Ciao Gianfranco,
    non è del tutto vero... nel senso che ci sarebbe un modo (forse più) di intercettare la formattazione condizionale (anche se di solito il gioco non vale la candela). Ma per ulteriori informazioni credo che scossa sia la persona che meglio ti potrebbe dare delle delucidazioni :28:

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  13. #12
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Pistoia
    Età
    47
    Messaggi
    1072
    Versione Office
    Excel 2016
    Likes ricevuti
    19
    Likes dati
    15
    Grande cromagno
    volevo propio questa formula perfetto somma indipendente le check box e le somma se entrambe spuntate
    Grande..........Grande:208:

    unica cosa avevo messo al posto dello zero finale, le virgolette "" per lasciare vuoto ma mi resituisce un errore.
    Qual'è la dicitura mer lasciare la cellla vuota se le check box non sono spuntate????
    windows 10
    Excel 2016

  14. #13

    L'avatar di scossa
    Clicca e Apri
    Data Registrazione
    Jul 2015
    Località
    Verona Provincia
    Età
    57
    Messaggi
    1022
    Versione Office
    .
    Likes ricevuti
    366
    Likes dati
    0
    Ciao,

    Citazione Originariamente Scritto da cromagno Visualizza Messaggio
    =SE(N40=VERO;MATR.SOMMA.PRODOTTO((N$4:N$33="x")*($D$4:$D$33="A"));0)+SE(N41=VERO;MATR.SOMMA.PRODOTTO((N$4:N$33="x")*($D$4:$D$33="B"));0)
    possiamo evitare i SE():
    =N40*MATR.SOMMA.PRODOTTO((N$4:N$33="x")*($D$4:$D$33="A"))+N41*MATR.SOMMA.PRODOTTO((N$4:N$33="x")*($D$4:$D$33="B"))
    Bye!
    scossa
    scossa's web site
    ___
    Se tu hai una mela, e io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno. Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw)

  15. I seguenti utenti hanno dato un "Like"


  16. #14
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Pistoia
    Età
    47
    Messaggi
    1072
    Versione Office
    Excel 2016
    Likes ricevuti
    19
    Likes dati
    15
    si scossa funziona però volevo provare a lascaire la cella vuota se non sono spuntate le check box
    invece di venire 0
    comunque funziona bene

    Grazie:87:_
    windows 10
    Excel 2016

  17. #15

    L'avatar di scossa
    Clicca e Apri
    Data Registrazione
    Jul 2015
    Località
    Verona Provincia
    Età
    57
    Messaggi
    1022
    Versione Office
    .
    Likes ricevuti
    366
    Likes dati
    0
    Citazione Originariamente Scritto da cromagno Visualizza Messaggio
    Ciao Gianfranco,
    non è del tutto vero... nel senso che ci sarebbe un modo (forse più) di intercettare la formattazione condizionale (anche se di solito il gioco non vale la candela). Ma per ulteriori informazioni credo che scossa sia la persona che meglio ti potrebbe dare delle delucidazioni :28:
    Dalla versione 2010 si può usare la proprietà DisplayFormat ma, a parte che non è utilizzabile in una UDF, in questo caso sarebbe complicato usarla in una sub perché il colore non è differenziato per le colonne delle checkbox.


    Codice: 
    Public Sub contaColore(ByRef rng As Range)
      Dim j As Long
      Dim cella As Range
      For Each cella In rng.Cells
        With cella.DisplayFormat.Interior
          If .ColorIndex <> cella.Interior.ColorIndex Then j = j + 1
        End With
      Next cella
      MsgBox j
    End Sub
    
    
    Sub prova()
      Call contaColore(Range("L4:L33"))
    End Sub
    Bye!
    scossa
    scossa's web site
    ___
    Se tu hai una mela, e io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno. Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw)

  18. #16

    L'avatar di scossa
    Clicca e Apri
    Data Registrazione
    Jul 2015
    Località
    Verona Provincia
    Età
    57
    Messaggi
    1022
    Versione Office
    .
    Likes ricevuti
    366
    Likes dati
    0
    Citazione Originariamente Scritto da nick0573 Visualizza Messaggio
    si scossa funziona però volevo provare a lascaire la cella vuota se non sono spuntate le check box
    invece di venire 0
    Puoi impostare nelle proprietà del foglio di non mostrare lo 0.
    Bye!
    scossa
    scossa's web site
    ___
    Se tu hai una mela, e io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno. Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw)

  19. #17
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Pistoia
    Età
    47
    Messaggi
    1072
    Versione Office
    Excel 2016
    Likes ricevuti
    19
    Likes dati
    15
    giusto nel formato personalizzato lasciare cella vuota se ce lo zero
    ...........................................:67:
    windows 10
    Excel 2016

  20. #18

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4024
    Versione Office
    2013
    Likes ricevuti
    1228
    Likes dati
    923
    Citazione Originariamente Scritto da scossa Visualizza Messaggio
    Dalla versione 2010 si può usare la proprietà DisplayFormat ma, a parte che non è utilizzabile in una UDF, in questo caso sarebbe complicato usarla in una sub perché il colore non è differenziato per le colonne delle checkbox.
    Ciao scossa,
    è vero che non è possibile utilizzare DisplayFormat "direttamente" in una UDF, però è possibile utilizzarla in una UDF che dopo sarà richiamata da una sub (o credo anche da un evento tipo Worksheet Change).

    Mi riferivo infatti ad una vecchia discussione su un altro forum...
    Ti lascio un file di esempio per capire se sto dicendo scemenze (e di conseguenza dovrò riguardarmi l'argomento :246:)...

    [EDIT]
    Mi rendo comunque conto che richiamare una UDF invece che scrivere direttamente una sub non ha molto senso...
    E come hai già detto, nel caso del file di "nick" non credo risulterebbe efficace questa strada.

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  21. #19

    L'avatar di scossa
    Clicca e Apri
    Data Registrazione
    Jul 2015
    Località
    Verona Provincia
    Età
    57
    Messaggi
    1022
    Versione Office
    .
    Likes ricevuti
    366
    Likes dati
    0
    Citazione Originariamente Scritto da cromagno Visualizza Messaggio
    Ciao scossa,
    è vero che non è possibile utilizzare DisplayFormat "direttamente" in una UDF, però è possibile utilizzarla in una UDF che dopo sarà richiamata da una sub (o credo anche da un evento tipo Worksheet Change).

    Mi riferivo infatti ad una vecchia discussione su un altro forum...
    Ti lascio un file di esempio per capire se sto dicendo scemenze (e di conseguenza dovrò riguardarmi l'argomento :246:)...

    [EDIT]
    Mi rendo comunque conto che richiamare una UDF invece che scrivere direttamente una sub non ha molto senso...
    E come hai già detto, nel caso del file di "nick" non credo risulterebbe efficace questa strada.
    Solo una "precisazione": il termine UDF andrebbe usato per identificare una function utilizzabile lato celle, negli altri casi è preferibile usare il termine function.
    Bye!
    scossa
    scossa's web site
    ___
    Se tu hai una mela, e io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno. Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw)

Discussioni Simili

  1. Contare celle colorate con formattazione condizionale
    Di alfrimpa nel forum Domande su Excel VBA e MACRO
    Risposte: 12
    Ultimo Messaggio: 15/08/16, 12:02
  2. Contare celle in base a un tipo di formattazione
    Di Theinvoker nel forum Domande su Excel in generale
    Risposte: 10
    Ultimo Messaggio: 26/04/16, 11:23
  3. Contare celle consecutive scartando un determinato valore
    Di Davide nel forum Domande su Excel VBA e MACRO
    Risposte: 22
    Ultimo Messaggio: 09/01/16, 10:46
  4. Conta celle colorate con formattazione condizionale
    Di ges nel forum Domande su Excel VBA e MACRO
    Risposte: 5
    Ultimo Messaggio: 08/01/16, 20:36
  5. Conta celle colorate
    Di Gianfranco55 nel forum Domande su Excel VBA e MACRO
    Risposte: 17
    Ultimo Messaggio: 07/01/16, 12:11

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •