Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

[Excel] Raggruppare spese per mese

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] Raggruppare spese per mese

Postdi webmaster » 18/10/11 16:11

Salve,
Ho una tabella Excel in cui nella colonna A ho la data e nella colonna B indico una spesa (numero negativo) o un guadagno (un numero positivo). Vorrei creare un secondo foglio in cui nella colonna A si indica il mese e anno, nella colonna B si sommano tutte le spese per quel mese e nella colonna C tutti i guadagni. Qualcuno sa come farlo in automatico senza pivot?
Avatar utente
webmaster
Moderatore
 
Post: 3491
Iscritto il: 01/08/01 01:00

Sponsor
 

Re: [Excel] Raggruppare spese per mese

Postdi Flash30005 » 18/10/11 20:32

Buonasera WM

Supponendo che la prima riga sia di intestazione
Foglio1 A1 = Data, B1 = Movimento
Foglio2 A1 = Data, B1 = Uscite, C1 = Entrate
Con questa macro dovresti risolvere

Codice: Seleziona tutto
Sub Riepilogo()
Set WS1 = Worksheets("Foglio1")
Set WS2 = Worksheets("Foglio2")
UR1 = WS1.Range("A" & Rows.Count).End(xlUp).Row
UR2 = WS2.Range("A" & Rows.Count).End(xlUp).Row
WS2.Range("A2:C" & UR2).ClearContents
MMese = 0
For RR1 = 2 To UR1
    Mese = Month(WS1.Range("A" & RR1).Value)
    Anno = Year(WS1.Range("A" & RR1).Value)
    If MMese <> Mese Then
        UR2 = WS2.Range("A" & Rows.Count).End(xlUp).Row + 1
        MMese = Mese
    End If
        WS2.Range("A" & UR2).Value = WS1.Range("A" & RR1).Value
        WS2.Range("A" & UR2).NumberFormat = "mm/yyyy"
        If WS1.Range("B" & RR1).Value < 0 Then
            WS2.Range("B" & UR2).Value = WS2.Range("B" & UR2).Value + WS1.Range("B" & RR1).Value
        Else
            WS2.Range("C" & UR2).Value = WS2.Range("C" & UR2).Value + WS1.Range("B" & RR1).Value
        End If
Next RR1
End Sub


Un pulsante potrà attivare la macro direttamente dal Foglio2 (o Foglio1)
Comunque Allego File funzionante

Fai sapere
Ciao
Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: [Excel] Raggruppare spese per mese

Postdi Anthony47 » 19/10/11 01:28

Ciao wm, bentornato nel forum :D :D

Se vuoi farlo con formule, invece della macro (vedi post di Flash sopra):
1) I tuoi dati sono su Foglio1, da A2 a B1000 (o inferiore)
2) Su Foglio 2, in A2 metti la formula
Codice: Seleziona tutto
=MIN(Foglio1!A:A)-GIORNO(MIN(Foglio1!A:A))+1

Formatta la cella come data, con visualizzazione mmm-aaaa
3) In A3 metti la formula
Codice: Seleziona tutto
=DATA.MESE(A2;1)
Copi poi A3 verso il basso per i mesi che ti servono
4) Formula in B2:
Codice: Seleziona tutto
=MATR.SOMMA.PRODOTTO(--(Foglio1!$A$2:$A$1000>=$A2);--(Foglio1!$A$2:$A$1000<$A3);--(Foglio1!$B$2:$B$1000<0);ASS(Foglio1!$B$2:$B$1000))

5) Formula in C2:
Codice: Seleziona tutto
=MATR.SOMMA.PRODOTTO(--(Foglio1!$A$2:$A$1000>=$A2);--(Foglio1!$A$2:$A$1000<$A3);--(Foglio1!$B$2:$B$1000>0);ASS(Foglio1!$B$2:$B$1000))

6) Copia poi B2:C2 verso il basso per i mesi che hai previsto.

Metti in riga1 le intestazioni Mese /Costi /Ricavi, o altre a piacere.
Il col B i costi vengono rappresentati come numeri positivi (perche' un costo negativo e' un ricavo); ma se preferisci vederli negativi metti "meno" in testa alla formula oppure elimina quel "ASS" nelle formule.

Ciao
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13892
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: [Excel] Raggruppare spese per mese

Postdi Francesco53 » 19/10/11 09:51

Buongiorno a tutti,
domanda, se nella colonna C inserisco le varie voci di spesa, Es. Auto, Alimentari, Conto Corrente, etc.
come posso raggruppare i totali mensili per singola voce?
Grazie
Francesco
S.O. Vista e Office 2007
Francesco53
Utente Senior
 
Post: 647
Iscritto il: 20/02/10 18:45

Re: [Excel] Raggruppare spese per mese

Postdi Flash30005 » 19/10/11 12:35

@Francesco
Con altre condizioni o Select Case Else nella macro
dove ad ogni voce assegni il numero di colonna del foglio2
La procedura è la stessa ;)

Ciao
Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: [Excel] Raggruppare spese per mese

Postdi webmaster » 19/10/11 18:01

grazie a tutti ragazzi.

@flash, mi piace il tuo approccio e lo proverò

@anthony, mi sembra che il tuo metodo sia quello che stavo cercando. tenendo a mente che devo tradurre tutto (il mio excel è in inglese) devo ammettere che mi sono bloccato al punto 3. per qualche motivo excel non accetta la formula
Codice: Seleziona tutto
=DATE.MOMTH(A2;1)

sai cosa potrebbe essere?
Avatar utente
webmaster
Moderatore
 
Post: 3491
Iscritto il: 01/08/01 01:00

Re: [Excel] Raggruppare spese per mese

Postdi Francesco53 » 19/10/11 18:24

CIao prova:
Codice: Seleziona tutto
=DATE.MONTH(A2;1)

se non ricordo male dovrebbe essere Month
Francesco
S.O. Vista e Office 2007
Francesco53
Utente Senior
 
Post: 647
Iscritto il: 20/02/10 18:45

Re: [Excel] Raggruppare spese per mese

Postdi webmaster » 19/10/11 18:33

sì, intendevo scrivere MONTH non MOMTH :)
Avatar utente
webmaster
Moderatore
 
Post: 3491
Iscritto il: 01/08/01 01:00

Re: [Excel] Raggruppare spese per mese

Postdi Anthony47 » 19/10/11 23:33

La funzione Data.Mese si traduce EDATE, ed e' disponibile solo dopo l' installazione dell componente aggiuntivo Strumenti di analisi (Menu /Tools /Add-ins; spunta Analysis tool-pack, Ok).

Le altre dovrebbero essere:
MATR.SOMMA.PRODOTTO=Sumproduct
Min=Min
GIORNO=Day

Ciao
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13892
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: [Excel] Raggruppare spese per mese

Postdi webmaster » 20/10/11 00:20

grazie anthony.
ho installato il pacchetto, ma non mi permette ancora di inserire la formula al punto 3. hai altre idee?
Avatar utente
webmaster
Moderatore
 
Post: 3491
Iscritto il: 01/08/01 01:00

Re: [Excel] Raggruppare spese per mese

Postdi Anthony47 » 20/10/11 01:04

non mi permette ancora di inserire la formula al punto 3
Che significa? Cioe' che cosa riesci a fare, e che cosa ti dice il pc?

Avevi detto che provavi a scrivere =DATE.MONTH(A2;1); assodato che Date.Month e' invece EDATE, sei sicuro che il separatore di campi sia "punto-e-virgola" e non la "virgola"?


Ciao
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13892
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: [Excel] Raggruppare spese per mese

Postdi webmaster » 20/10/11 11:21

@anthony: mi da il tipico errore quando una formula è sbagliata - senza però dirti cosa correggere.
confermo di aver insertito correttamente: =EDATE.MONTH(A2;1);

che tu sappia le formule vengono tradotte se excel le apre in una lingua diversa da quella in cui sono state scritte?
in ogni caso - se non è troppo disturbo - potresti mandarmi un excel con le formule inserite? magari riesco a farci qualcosa io.


grazie
wm
Avatar utente
webmaster
Moderatore
 
Post: 3491
Iscritto il: 01/08/01 01:00

Re: [Excel] Raggruppare spese per mese

Postdi Flash30005 » 20/10/11 11:59

Buongiorno WM

Ti invio il file con le formule di Anthony nel foglio3
Nel Foglio2 invece ho lasciato la macro modificando l'avvio in maniera tale che aggiorna i conteggi ogni volta che visualizzi il foglio2
Così hai ampia scelta ;)

Downlod File

Ciao

P.s. @Anthony l'ultimo mese (Dicembre) del foglio2 non conteggia se non si aggiunge un testo o altro mese (genn2012) nella cella successiva (in A14)
Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: [Excel] Raggruppare spese per mese

Postdi webmaster » 20/10/11 12:41

grazie flash. adesso funziona tutto.
il problema è che DATA.MESE si traduce in EDATE, non EDATE.MONTH!

grazie anthony per aver dato l'input!
Avatar utente
webmaster
Moderatore
 
Post: 3491
Iscritto il: 01/08/01 01:00

Re: [Excel] Raggruppare spese per mese

Postdi webmaster » 20/10/11 13:06

@flash, mi sono accorto di un picoclo problema - lo stesso che tu accenni a anthony nel ps - ovvero che le spese di ottobre non si aggiornano e mi danno sempre 0. questo succede anche se metto una data a novembre e una spesa fittizia. sapresti dirmi come mai?
Avatar utente
webmaster
Moderatore
 
Post: 3491
Iscritto il: 01/08/01 01:00

Re: [Excel] Raggruppare spese per mese

Postdi webmaster » 20/10/11 13:35

webmaster ha scritto:@flash, mi sono accorto di un picoclo problema - lo stesso che tu accenni a anthony nel ps - ovvero che le spese di ottobre non si aggiornano e mi danno sempre 0. questo succede anche se metto una data a novembre e una spesa fittizia. sapresti dirmi come mai?

ok, ho capito. il dato fittizio devo aggiungerlo in fondo al foglio 2, non al foglio 1. adesso funziona tutto come ho sempre voluto!
Avatar utente
webmaster
Moderatore
 
Post: 3491
Iscritto il: 01/08/01 01:00


Torna a Applicazioni Office Windows


Topic correlati a "[Excel] Raggruppare spese per mese":


Chi c’è in linea

Visitano il forum: Nessuno e 10 ospiti