Risultati da 1 a 18 di 18

Discussione: Conta celle colorate



  1. #1
    L'avatar di Gianfranco55
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Vicenza
    Età
    62
    Messaggi
    2072
    Versione Office
    2016
    Likes ricevuti
    553
    Likes dati
    117

    Conta celle colorate

    Ciao
    continuando il post di nick
    Vi pregherei spiegarmi come intercettare i colori della formattazione condizionale
    diciamo con il solito quesito
    somma le celle gialle o il colore che più vi aggrada.
    A me risulta che o crei una tabella con i colori della formattazione e li usi come riferimento
    ( codice postato da Gerardo )
    o vba non intercetta i colori.
    Sto parlando di formattazione fatta dal foglio non in vba.
    Ci sono state fior di discussioni ma un risultato nonl'ho mai visto
    se non quello classico di utilizzare la stessa formula della formattazione.
    Mi fareste un gran favore ( ho una curiosità quasi morbosa ):166::166::166:
    Invia MPPM 

  2. #2

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4019
    Versione Office
    2013
    Likes ricevuti
    1228
    Likes dati
    923
    Ciao Gianfranco,
    stavamo continuando la discussione:
    http://www.forumexcel.it/forum/7-dom...ed=1#post12579

    Ma hai fatto bene ad aprire un nuovo thread :246:

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

  3. #3
    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 Gianfranco
    Anch'io sono interessato a contare le celle colorate che sono stare generate da una FCondizionale usandole formule e non il VBA.

    Io ho una mia soluzione forse semplice che però richiede una griglia aggiuntiva che poi la possiamo nascondere in modo che non si vede
    La logica è questa:
    Tutti noi ormai sappiamo che il colore della FC si ottiene quando il risultato di una formula logica ci restituisce VERO, però il VERO non si vede nella cella ma vediamo solo il colore, allora io come faccio a fare una formula se non c'è scritto niente?? a questo punto io farei una griglia a fianco delle stesse dimensioni e li metterei la stessa formula che ho usato nella finestra di dialogo della formattazione condizionale cosi a quel punto andro a fare dei conteggi con il CONTA.SE
    esempio =CONTA.SE(A1:A22;VERO)
    cosi otterremo appunto la somma di tutti i VERO cioò la somma di quel colore creato con la FC
    Spero di essere stato chiaro
    Vedi allegato
    fammi sapere Ciao
    File Allegati File Allegati
    • Tipo File: xlsx FC.xlsx (10.2 KB, 36 Visualizzazioni)
    Ultima modifica fatta da:Gerardo Zuccalà; 05/01/16 alle 23:40
    Invia MPPM 

  4. #4
    L'avatar di Gianfranco55
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Vicenza
    Età
    62
    Messaggi
    2072
    Versione Office
    2016
    Likes ricevuti
    553
    Likes dati
    117
    Ciao Gerardo

    e no!:166::166:

    così è come facciamo tutti,
    e non serve la colonna d'appoggio
    = CONTA.SE(A1:A18;"<=70")

    in pratica uso la formula della formattazione per sommare le celle rosse.

    Io mi riferisco alla frase che è stata detta mi sembra da Cromagno
    che si può fare da VBA intercettando i colori della formattazione.
    Ora io so che posso creare una colonna colori inseriti a mano e compararli
    con la formattazione ( messi a mano i colori vengono intercettati)
    e utilizzare la funzione che tu hai inserito nell'altra discussione
    se guardi il sito te lo spiegano, hanno una tabella a parte con i colori inseriti a mano.
    Altrimenti formattare tutto da VBA

    ciao:32:
    Invia MPPM 

  5. #5
    L'avatar di mb63
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Torino
    Età
    54
    Messaggi
    484
    Versione Office
    2007/10/13 w10
    Likes ricevuti
    18
    Likes dati
    94
    buon giorno visto che il mondo di internet è variegato e ampio
    avevo sbattuto la testa in un argomento simile e qualche "guru" su un altro sito mi aveva aiutato è giusto che condivida può sempre essere utile anche se magari non precisamente attinente alle esigenze ma con un po' di esperienza s può adattare alle proprie necessita
    buona giornata

    Ciao Sc...a
    Grazie Gerardo
    grazie a tutti
    questo è un sito di Excel e vba ma mi sembra di essere a MasterChef dove tutti aiutano a togliere le patate dal fuoco prima che brucino
    Invia MPPM 

  6. #6
    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
    @mb63
    Grazie per il tuo contributo, tuttavia in questo forum è vietato segnalare altri forum, sono permessi eventualmente altri siti
    Leggi regolamento
    Ciao

    Regola nr. 20 "segnlare altri forum"
    E' altresi vietato la segnalazione tramite link o citazioni di altri forum al fine di preservare il naturale svolgimento di una discussione. esempio non si può linkare un'altro forum per la eventuale soluzione ad un problema o semplicemente per rimarcare l'esistenza di quel forum
    Invia MPPM 

  7. #7
    L'avatar di mb63
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Torino
    Età
    54
    Messaggi
    484
    Versione Office
    2007/10/13 w10
    Likes ricevuti
    18
    Likes dati
    94
    scusami Gerardo ma avevo visto che in un file precedentemente allegato c'era il link e siccome nel mio file c'erano dati sensibili pensavo si potesse postare, in considerazione del fatto che l'aiuto arriva da una persona molto importante di questo sito

    scusate ancora non ripeterò l'errore

    adesso vado a vedere come poter impostare l'immagine nel mio profilo visto che sto per essere cancellato...

    buona giornata

    scusa per capire meglio l'errore

    postato nell'altra discussione

    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/

    by gerardo
    Invia MPPM 

  8. #8
    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
    Citazione Originariamente Scritto da mb63 Visualizza Messaggio
    visto che sto per essere cancellato...
    Se dovessi cancellare tutte le persone che violano il regolamento, in questo forum, ne rimarrebbero solo 3/4 persone, comunque è bene ricordare il regolamento e sopratutto evitare di essere recidivi..
    PS bella immagine avatar
    Ciao
    Invia MPPM 

  9. #9
    L'avatar di mb63
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Torino
    Età
    54
    Messaggi
    484
    Versione Office
    2007/10/13 w10
    Likes ricevuti
    18
    Likes dati
    94
    Ma non è la stessa cosa citare o riportare li com è stato fatto prima?
    Invia MPPM 

  10. #10

    L'avatar di scossa
    Clicca e Apri
    Data Registrazione
    Jul 2015
    Località
    Verona Provincia
    Età
    57
    Messaggi
    1017
    Versione Office
    .
    Likes ricevuti
    366
    Likes dati
    0
    Citazione Originariamente Scritto da mb63 Visualizza Messaggio
    Ma non è la stessa cosa citare o riportare li com è stato fatto prima?
    La differenza è tra forum e blog (o sito o altro che non sia un forum).
    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)
    Invia MPPM 

  11. #11
    L'avatar di Gianfranco55
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Vicenza
    Età
    62
    Messaggi
    2072
    Versione Office
    2016
    Likes ricevuti
    553
    Likes dati
    117
    Ciao MB

    me lo ricordavo il post in questione
    ma non ricordavo che aveva avuto buon esito:92:
    perché non posti il file anche qui
    a quel tempo non l'avevo archiviato
    anche se sono convinto che il metodo di utilizzo della formula in formattazione resti il meno
    caotico:166:

    un salutone a tutte le Befane del Forum:279:
    Invia MPPM 

  12. #12

    L'avatar di scossa
    Clicca e Apri
    Data Registrazione
    Jul 2015
    Località
    Verona Provincia
    Età
    57
    Messaggi
    1017
    Versione Office
    .
    Likes ricevuti
    366
    Likes dati
    0
    Citazione Originariamente Scritto da Gianfranco55 Visualizza Messaggio
    Ciao MB

    me lo ricordavo il post in questione
    ma non ricordavo che aveva avuto buon esito:92:
    ...
    Per semplificare la questione riporto il mio intervento (essendone l'autore non credo di violare alcuna regola):
    "
    E verissimo che la proprietà .DisplayFormat non funziona in una UDF, ma la si può usare in una sub.

    Bravo, direte voi, ma noi la vogliamo in automatico come se fosse una formula ...
    Bene, domanda: quali sono le sub che vengono eseguite in automatico?
    risposta: le routine di evento.

    Quindi, se nella routine di evento Worksheet_Change() del Foglio1 noi mettiamo questo codice
    Codice: 
    Private Sub Worksheet_Change(ByVal Target As Range) 
        If Intersect(Target, Range("N2:N4")) Is Nothing Then '<- per prudenza 
            If (Not Intersect(Target, Me.Range("E2:E200")) Is Nothing) Or _ 
            (Not Intersect(Target, Me.Range("G2:G200")) Is Nothing) Then 
                Application.EnableEvents = False 
                Me.Range("N2") = CountColor(Me.Range("H2:H200"), 3) 'rossi 
                Me.Range("N3") = CountColor(Me.Range("H2:H200"), 6) 'gialli 
                Me.Range("N4") = CountColor(Me.Range("H2:H200"), 14) 'verdi 
                Application.EnableEvents = True 
            End If 
        End If 
    End Sub
    avendo messo in un modulo standard le due function già utilizzate (ho solo rivisto i nomi delle variabili):
    Codice: 
    Function CountColor(ByRef rngCheck As Range, ByVal nColorIndex As Long) As Long 
        Dim rCell As Range 
        CountColor = 0 
        For Each rCell In rngCheck 
            If GetColor(rCell) = nColorIndex Then CountColor = CountColor + 1 
        Next 
    End Function 
    
    
    Function GetColor(ByRef rCella As Range) As Long 
        GetColor = rCella.DisplayFormat.Interior.ColorIndex 
    End Function

    ecco che ad ogni variazione nelle celle che influenzano la FC delle celle H2:H200 (in questo esempio E2:E200 e G2:G200), avremo il ricalcolo del conteggio.
    "
    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)
    Invia MPPM 

  13. #13
    L'avatar di Gianfranco55
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Vicenza
    Età
    62
    Messaggi
    2072
    Versione Office
    2016
    Likes ricevuti
    553
    Likes dati
    117
    Trovato il file prova
    lo allego

    codici risolti da Scossa:255:

    ciao
    File Allegati File Allegati
    Invia MPPM 

  14. #14
    L'avatar di mb63
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Torino
    Età
    54
    Messaggi
    484
    Versione Office
    2007/10/13 w10
    Likes ricevuti
    18
    Likes dati
    94
    Grazie scossa per il chiarimento e per la soluzione che mi avevi proposto e che a queto punto hai riscritto tu personalmente su questo forum

    un grosso Grazie a te per la tua disponibilità a rispondere a tutte le domande sui vari forum e Grazie perchè con la tua disponibilità dai la possibilità a chi rischia il proprio posto di lavoro di trovare le soluzioni necessarie pur non avendo studiato VBA

    Alla prossima

    Scossa tu noi sei un Guru sei un super Guru dotato di strapoteri informatici

    per Gianfranco vedo che hai già avuto la risposta direttamente dalla fonte del capolavoro penso non ti serva altro
    scusatemi per il ritardo ma ero impegnato e non ho potuto rispondere tempestivamente dal cellulare

    :255::255::255::286::98::98::98:
    Invia MPPM 

  15. #15
    L'avatar di A.Maurizio
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Torino
    Età
    56
    Messaggi
    383
    Versione Office
    2013
    Likes ricevuti
    44
    Likes dati
    0
    Ciao GianFranco : Provo ad inserire anche Io una mia Provabile Soluzione al tuo problema.
    Viasto che Anni fà mi ero imbarcato in una cosa del Genere per il mio programma del SuperEnalotto .
    1 ) all'ora : Sè vuoi Trovare e calcolare quante Celle ci sono dello stesso Colore in una determinata riga.
    Devi per prima cosa : Creare una Riga a parte "con tutti i colori da te desiderati" Poi Formattare ogni colore inserendo questo codice : ( =CountCcolor(D12:K12;M5) ).
    Questo non fà altro che Conteggiare riga per Riga di una Determinata Tabella , che nel mio caso era all'interno delle Celle (D12:K12) "Numeri di Estrazione del mio Super Enalotto" .
    E li confrontava con i colori che avevo inserito nella Cella M5 "che sempre nel mio Caso era di colore Giallo" e mi dava il risultato .

    2 ) mentre se il tuo interesse e rivoltato più verso una formatazione Condizionata , Che conteggi tutti i Valori dello stesso tipo e li Colori di Giallo o Verde che sia .
    Allora ti posso dare due Soluzioni Niente male ; File da Scaricare.
    Ciao e fammi sapere
    File Allegati File Allegati
    Invia MPPM 

  16. #16
    L'avatar di Gianfranco55
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Vicenza
    Età
    62
    Messaggi
    2072
    Versione Office
    2016
    Likes ricevuti
    553
    Likes dati
    117
    Ciao Maurizio
    grazie per i file

    la mia era solo curiosità rivolta solamente all'intercettare i colori da formattazione
    condizionale con VBA.

    Pura didattica
    nei miei file cerco di non utilizzare vba per contare le celle colorate
    (anzi penso di non averne mai avuto bisogno)
    troppo codice

    preferisco utilizzare le formule che ho nella formattazione

    grazie ancora:167:
    Invia MPPM 

  17. #17
    L'avatar di A.Maurizio
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Torino
    Età
    56
    Messaggi
    383
    Versione Office
    2013
    Likes ricevuti
    44
    Likes dati
    0
    Ciao GianFranco Grazie per la tua precisazione , E scusami se come sempre sono arrivato tardi nel Rispondere al tuo Quisito .
    Comunque sia visto che anche io pur avendo alle spalle ore di programmazione , sono sempre alla ricerc di cose nuove da studiare .
    Per qui se il tuo problema era solo una Formattazione Condizionata : prova anche questa =CONTA.SE($L$1:$R$1;C1)>=1 )
    Dove nelle Celle L1:R1 ci sono i Numeri da confrontare in un Contesto di Numeri che partono dalla cella C1:H30 e li colora di giallo piuttosto che di verde ecc...!
    Grazie ancora per la tua pazzienza Saluti sinceri da Maurizio
    Invia MPPM 

  18. #18

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

    stiamo andando off-topic: questa è la sezione VBA, inutile continuare a parlare di formule lato celle.
    Visto che questa discussione è stata marcata come risolta, la chiudo.
    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)
    Invia MPPM 

Discussioni Simili

  1. conta celle piene consecutive con condizione
    Di colmax nel forum Domande su Excel in generale
    Risposte: 2
    Ultimo Messaggio: 11/11/16, 19:04
  2. 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
  3. Righe Colorate
    Di wildstar nel forum Domande su Excel VBA e MACRO
    Risposte: 17
    Ultimo Messaggio: 22/02/16, 18:50
  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. Contare celle colorate
    Di nick0573 nel forum Domande su Excel VBA e MACRO
    Risposte: 18
    Ultimo Messaggio: 05/01/16, 22:44

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
  •