Conteggio celle



  • Conteggio celle
    di verbo data: 26/07/2013 11:19:56

    Ciao a tutti, per piacere qualcuno sa dirmi se esiste una funzione che cona in un intervallo tutte le celle evidenziate per es con colore giallo?

    Grazie dell'aiuto
    Luigi



  • di nichicanta (utente non iscritto) data: 26/07/2013 11:40:21

    Ciao Verbo, prova cosi.
    Ti saluto
     
    metti questo codice all'interno di un modulo VBA
    
    Option explicit
    Sub Conta_celle_colorate()
    somma = 0
    For Each cella In Range("A1:B4")? qui ci metti il tuo intervallo di celle. 
    If cella.Interior.ColorIndex = 6 Then somma = somma + cella.Value
    Next
    MsgBox somma
    End Sub
    
    N.B. il numero 6 corrispone al colore giallo come tu hai richiesto.



  • di verbo data: 27/07/2013 20:09:26

    Ciao Nichi, una cosa non mi è chiara , il codice che mi hai scritto devo copiarlo come se fosse una normale macro?
    in questo caso quello che non capisco è che la macro non deve inìziare con sub
    In questo caso perchè inizia con Option explicit?
    ciao
    Luigi



  • di nichicanta (utente non iscritto) data: 27/07/2013 20:48:46

    Ciao Verbo.
    Option Explicit
    serve per dichiarare sempre le variabili all'interno di un modulo vba.
    Il codice che tu devi inserire nella macro quando la registri è quello che viene dopo Option Explicit.



    Apri l'editor vba con alt+F11, trona la tua macro registrata ed incollaci il codice che ti ho indicato.
    Fammi sapere.



  • di verbo (utente non iscritto) data: 27/07/2013 21:04:20

    Nichi, ma io non ho nessuna macro



  • di nichicanta (utente non iscritto) data: 27/07/2013 21:34:09

    Ti ho appena allegato un file con la macro già impostata.
    Appena apri il file di Excel (lo puoi usare e adattarlo alle tue esigenze perché è vuoto) per usare la macro che ti conta le celle colorate devi premere contemporaneamente ctrl+a.
    Fammi sapere.



  • di nichicanta (utente non iscritto) data: 27/07/2013 21:36:57

    Verbo ricordati che se devi contare un range di celle maggiore devi variare il range nel codice poiché il mio si ferma alla cella b4.



  • di verbo data: 27/07/2013 22:05:55

    Perfetto NIchi va alla grande
    grazie e buona domenica
    ciao
    Luigi



  • di verbo data: 30/07/2013 11:24:57

    Ciao Nichi, premesso che la tua macro funziona alla grandisisma.
    Ti chiedevo una cortesia, se volessi che anzichè il numero delle celle colorate mi compaia all'esterno del foglio cliccando ctr a, ma voglio che mi compare in una cella predefinita cosa devo modificare del codice e se voglio che in altra cella mi appare il nuemro delle celel colorate di rosso?
    Grazie dell'attenzione che vorrai prestarmi.
    ciao
    Luigi



  • di nichicanta (utente non iscritto) data: 30/07/2013 11:54:34

    Ti ho appena inviato un altro file con quello che mi chiedi.
    Se devi analizzare più colori sarebbe opportuno falo con un altro ciclo diverso ad If e andif.
    Ti saluto.



  • di verbo (utente non iscritto) data: 01/08/2013 21:01:16

    Grazie Nichi funziona benissimo

    ciao
    Luigi