Condividi:        

[Excel] - totali su formattazione condizionale

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

[Excel] - totali su formattazione condizionale

Postdi il_perozzi » 17/09/09 11:32

salve a tutti,
volevo sapere se è possibile ottenere i totali su una colonna (es. "G") dove ci sono oltre 2000 righe colorate in modo diverso e non consecutive, esempio
G2 = importo rosso
G3 = importo nero
G4 = importo verde
G5 = importo rosso
G6 = importo verde
....

per cui alla fine ottengo un totale generale per esempio 1.000.000, ecco volevo sapere se è possibile sapere quanto è rosso, quanto nero e quanto verde la cui somma restituisce appunto 1.000.000.
ovviamente senza fare ordinamenti per colore dato che, per mie esigenze, non posso stravolgere la tabella.

grazie come al solito per l'aiuto
il_perozzi
__________________________________________
(cos'è il genio? E' fantasia, intuizione, colpo d'occhio e rapidità di esecuzione)

Win 10 - Excel 2010
Avatar utente
il_perozzi
Utente Junior
 
Post: 95
Iscritto il: 23/05/07 12:28
Località: roma

Sponsor
 

Re: [Excel] - totali su formattazione condizionale

Postdi Flash30005 » 17/09/09 12:46

Non hai specificato se il colore si riferisse al font o al fondo delle celle
questa macro somma a pari colore font

Codice: Seleziona tutto
Sub CalcolaCol()
    Dim Vettore(60) As String
    URC = Worksheets("Foglio1").Range("G" & Rows.Count).End(xlUp).Row
    For C = 2 To URC
    Col = Range("G" & C).Font.ColorIndex
    If Col < 1 Then Col = 1
        Range("K" & Col).Value = Range("K" & Col).Value + Range("G" & C).Value
    Range("K" & Col).Font.ColorIndex = Col
   
    Next C
        Columns("K:K").AdvancedFilter _
        Action:=xlFilterCopy, _
        CopyToRange:=Range("J2"), Unique:=True
Columns("K:K").Delete
End Sub


Utlizza la colonna K temporaneamente e nella colonna J mette il totale con il font dello stesso colore dei valori conteggiati

Fai sapere
Ciao
Flash
Win10 + Office 2010 Ita
"Fotografica" al servizio dell'immagine
Avatar utente
Flash30005
Moderatore
 
Post: 8517
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: [Excel] - totali su formattazione condizionale

Postdi il_perozzi » 17/09/09 13:44

allora la macro funziona ma mi restituisce solo il totale generale e non quello diviso per colore, esempio se il totale è 1.000.000 avrò 350.000 rosso
400.000 verde
e 250.000 nero

che sommato da 1.000.000.

spero di essere stato chiaro. i colori sono solo per il font
il_perozzi
__________________________________________
(cos'è il genio? E' fantasia, intuizione, colpo d'occhio e rapidità di esecuzione)

Win 10 - Excel 2010
Avatar utente
il_perozzi
Utente Junior
 
Post: 95
Iscritto il: 23/05/07 12:28
Località: roma

Re: [Excel] - totali su formattazione condizionale

Postdi Venerdi » 17/09/09 13:54

...approfitto ignobilmente del thread...

Come andrebbe modificata la macro se invece di ricercare il totale si cercasse il semplice conteggio delle celle (sempre per colore di cella e font)?


Grazie
V.
Avatar utente
Venerdi
Utente Junior
 
Post: 63
Iscritto il: 18/03/02 20:05
Località: Roma

Re: [Excel] - totali su formattazione condizionale

Postdi Anthony47 » 20/09/09 18:16

Mi pare che non sia stato risolto il quesito del perozzi, pero' faccio notare che intercettare il colore da formattazione condizionata e' "quasi" impossibile; va invece intercettata la condizione di formattazione, cosa che puo' essere fatta anche con formule sul foglio.
Quindi se il problema e' di colori da formattazione condizionale, come dice il titolo, posta quale e' la clausola di formattazione e potro' dare qualche suggerimento in piu'.

Per venerdi':
1) e' vero! :D
2) guarda la funzione CCC in questa discussione viewtopic.php?f=26&t=72430

Per il_perozzi: se non fosse da formattazione condizionale, possiamo usare la stessa CCC del post linkato per Venerdi', solo modificando If Cella .ColorIndex = TColor Then CCC = CCC + 1 in If Cella .ColorIndex = TColor Then CCC = CCC + Cella.Value Ma in questo caso sarebbe piu' opportunno rinominare la funzione in SCC (Sum Cell Color).

Ciao.
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: [Excel] - totali su formattazione condizionale

Postdi Flash30005 » 20/09/09 23:44

il_perozzi ha scritto:allora la macro funziona ma mi restituisce solo il totale generale e non quello diviso per colore, esempio se il totale è 1.000.000 avrò 350.000 rosso
400.000 verde
e 250.000 nero

che sommato da 1.000.000.
spero di essere stato chiaro. i colori sono solo per il font


Infatti io avevo capito che ti servivano i totali divisi per colore e quella macro funziona proprio così

Immagine

Ciao
Flash
Win10 + Office 2010 Ita
"Fotografica" al servizio dell'immagine
Avatar utente
Flash30005
Moderatore
 
Post: 8517
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: [Excel] - totali su formattazione condizionale

Postdi Anthony47 » 21/09/09 00:05

La macro intercetta i colori da formattazione, NON da formattazione condizionale.
Confermo il mio messaggio delle 19:16, oltre che confermare la mia opinione di sempre: i colori sono elementi di presentazione delle informazioni, non dovrebbero essere usati per dare valore alle stesse.

Ciao.
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea


Torna a Applicazioni Office Windows


Topic correlati a "[Excel] - totali su formattazione condizionale":


Chi c’è in linea

Visitano il forum: Nessuno e 52 ospiti