Stellar Blade Un'esclusiva PS5 che sta facendo discutere per l'eccessiva bellezza della protagonista. Vieni a parlarne su Award & Oscar!

Excel Forum Per condividere esperienze su Microsoft Excel

creare una macro che somma solo le celle colorare

  • Messaggi
  • OFFLINE
    c.luinetti
    Post: 42
    Registrato il: 30/06/2016
    Città: MILANO
    Età: 49
    Utente Junior
    2013
    00 13/12/2017 11:47
    ciao a tutti

    potete aiutarmi a creare una macro che sommi solo i valori delle celle colorante (in arancione nel mio caso ), in un range impostato e metta il risultato in una cella specifica

    allego foglio di esempio.

    grazie

    Claudio
  • OFFLINE
    alfrimpa
    Post: 3.572
    Registrato il: 21/06/2013
    Città: NAPOLI
    Età: 70
    Utente Master
    Excel 365
    00 13/12/2017 14:15
    Ciao c.luinetti

    il codice è questo

    vb
    Function SommaCol(rng As Range)
Dim cel As Range
For Each cel In rng
    If cel.Interior.ColorIndex = 44 Then
        SommaCol = SommaCol + cel.Value
    End If
Next cel
End Function


    che è una function che va inserita sul foglio passando come parametro il range interessato.

    Era piuttosto semplice tu non ci hai provato nemmeno?

    Tieni presente che il totale che hai fornito non è corretto e che 9.06 è scritto con il punto e non con la virgola (come dovrebbe essere)
    [Modificato da alfrimpa 13/12/2017 14:47]

    Alfredo
  • OFFLINE
    c.luinetti
    Post: 42
    Registrato il: 30/06/2016
    Città: MILANO
    Età: 49
    Utente Junior
    2013
    00 13/12/2017 15:58
    ciao, grazie

    stavo provando con la Sub.
    non ho mai scritto un function, infatti sto capendo come eseguirla.

    Da quando seguo questo forum sto imparando molto di vba

    Grazie
    Claudio
  • OFFLINE
    c.luinetti
    Post: 43
    Registrato il: 30/06/2016
    Città: MILANO
    Età: 49
    Utente Junior
    2013
    00 13/12/2017 19:43
    come faccio a far funzionare la function, non riesco a mettere in pratica quello che mi hai scritto, scusa ma non l'ho mai fatto.
    potresti spiegarmi magari con il mio esempio xls ?



    grazie
    claudio
  • OFFLINE
    rollis13
    Post: 612
    Registrato il: 16/08/2015
    Città: CORDENONS
    Età: 67
    Utente Senior
    Excel 2016-32bit Win11
    00 13/12/2017 22:09
    Te lo spiego io; la Function la metti in un modulo vba mentre nella cella F2 scrivi:

    =SommaCol(B2:E32)

    ______________________________________________________________
    C'è chi fa le COSE a CASO e chi fa CASO alle COSE (Ignoto)
  • OFFLINE
    c.luinetti
    Post: 44
    Registrato il: 30/06/2016
    Città: MILANO
    Età: 49
    Utente Junior
    2013
    00 18/12/2017 10:03
    Grazie a tutti.

    funziona benissimo e ho capito come fare.
Soluzioni Excel Domande e Risposte
Passa alla versione desktop

  • Anteprima