Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Matrice per totale giornaliero per data

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

Matrice per totale giornaliero per data

Postdi danibi60 » 06/02/18 16:58

Buonasera a tutti,

vorrei poter conteggiare giornalmente un totale per data relativamente al file che Vi allego.

Il file è frutto di una estrazione giornaliera da un gestionale e quindi varia non come numero campi in orizzontale ma solo in verticale crescendo per data.

Ciò che mi interessa produrre una matrice che generi un totale giornaliero che tenga conto di:

data (colonna D)
Numero di spedizione ma solo quelle con lo 023 (colonna A)
Totale importo che adesso compare solo nella colonna AA

Se possibile copiare quindi questo file estratto ogni giorno dietro a questa matrice e elaborare il totale senza farlo più manualmente.

Ho provato a creare una tabella PIVOT ma con risultati pessimi in quanto il file allegato genera già un totale raggruppando ogni spedizione.

Spero di esser stato abbastanza chiaro purtroppo come già detto altre volte sono alle prime armi.

Grazie sin da subito
Danilo

https://www.dropbox.com/s/svwgqabm608xp ... .xlsx?dl=0
"Chi ama un ranocchio non sa che farsene se al secondo bacio è già un Principe Azzurro."
Win 10 & Office 2007
danibi60
Utente Senior
 
Post: 179
Iscritto il: 11/07/13 09:21
Località: Bergamo

Sponsor
 

Re: Matrice per totale giornaliero per data

Postdi Anthony47 » 06/02/18 23:54

Ma quindi vorresti una tabella che ha in verticale come intestazione di riga i vari Numeri di spedizione, come intestazione di colonna ha le varie date, e nell'intersezione NumeroSpedizione /Data ha calcolato il totale Spediz?
Tutto limitatamente alle spedizioni che cominciano con 023.
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: 15153
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Matrice per totale giornaliero per data

Postdi danibi60 » 07/02/18 09:10

Ciao Anthony,

si, per intendersi meglio un totale per data che raggruppi tutte le spedizoni che iniziano per 023-xxxx, ora il totale è indicato in colonna AA

Ti faccio un esempio:
Prendiamo la prima spedizione collovìcata nella colonna A2-A3 e cioè la sped. 282-20964
In questo caso questa spedizione è composta da due colli vedi colonna O2-e O3 (ma potrebnbero esser di più) e questa spedizione ha ora un totale €29,00 che altro non è che la risultanza di V2 e V3 alle quali sono sottratte le colonne W-X-Y.

Ora quel che a me interessa è avere questo risultato (€29) per singola spedizione.

Spero di esser stato sufficientemente chiaro,
Grazie,
Danibi
"Chi ama un ranocchio non sa che farsene se al secondo bacio è già un Principe Azzurro."
Win 10 & Office 2007
danibi60
Utente Senior
 
Post: 179
Iscritto il: 11/07/13 09:21
Località: Bergamo

Re: Matrice per totale giornaliero per data

Postdi Anthony47 » 08/02/18 00:27

Sulla base di quanto ho capito ti propongo questa macro:
Codice: Seleziona tutto
Sub DayRIEP()
'Vedi http://www.pc-facile.com/forum/viewtopic.php?f=26&t=109392&p=641951#p641951
Dim cSh As Worksheet, rSh As Worksheet, tSped As String, cSped As String
Dim myNext As Long, cVal As Single, speDat As Date
'
Set cSh = ActiveSheet
Sheets.Add after:=cSh
Set rSh = ActiveSheet
rSh.Range("A1:C1") = Array("Spedizione", "Data", "Valore")
cSh.Select
tSped = "023-"
For I = 2 To Cells(Rows.Count, 1).End(xlUp).Row
    If Left(Cells(I, 1), 4) = tSped Then
        cSped = Cells(I, 1)
        If Cells(I, "D").Value <> "" Then speDat = Cells(I, "D").Value
        If cSped = Cells(I + 1, 1) Then
            cVal = cVal + Cells(I, "V") + Cells(I, "W") + Cells(I, "X") + Cells(I, "Y")
        Else
            cVal = cVal + Cells(I, "V") + Cells(I, "W") + Cells(I, "X") + Cells(I, "Y")
            myNext = rSh.Cells(Rows.Count, 1).End(xlUp).Row + 1
            rSh.Cells(myNext, 1) = cSped
            rSh.Cells(myNext, 2) = speDat
            rSh.Cells(myNext, 3) = cVal
            cVal = 0
        End If
    End If
Next I
MsgBox ("Completato...")
End Sub
Va inserita in un ModuloStandard del vba; poi selezioni il foglio col report giornaliero e avvii la Sub DayRIEP
Ti creera' un nuovo Foglio in cui sara' creato un riepilogo lineare con
-N° spedizione
-data di spedizione
-valore totale

Prova e fai sapere...
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: 15153
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Matrice per totale giornaliero per data

Postdi danibi60 » 08/02/18 11:37

Ciao Antony, e grazie infinite.

Ho cercato di capire quanto mi hai suggerito e ho fatto come segue:

1) Ho aperto un file come quello che ti avevo inviato, fatto cliccato su tasti Alt+F11, copiato la tua marco e cliccato nuovamente su Alt+ F11 per uscire dal modulo.

2) Dopodiché ho cliccato su Alt+F8 e eseguito la macro che ha estrattoo per n° filiale 023 e per data i dati richiesti.

Ora però volevo capire se è possibile avere un totale per data e se per eseguire giornalmente questa operazione devo sempre ripetere l'operazione di cui sopra (punto 1 e poi punto 2) o se invece è sufficiente copiare ogni volta il file che estraggo dal gestionale e lanciare semplicemente la macro con Alf + F8 la quale mi aggiorna le date e mi esegue i totali ogni volta.

Spero come sempre di essermi spiegato con chiarezza...da principiante s'intende.

https://www.dropbox.com/s/ep4ul2ugubzas ... .xlsx?dl=0

Danibi

Allego di seguito il file elaborato dalla macro, seppur, am credo di sbagliare io qualcosa, non mi permette di salvarlo con la macro inserita, per farti capire se è corretto quanto fatto. In foglio 2 ho inserito io manualmente i totali giusto per farti vedere cosa è nei miei desideri.
"Chi ama un ranocchio non sa che farsene se al secondo bacio è già un Principe Azzurro."
Win 10 & Office 2007
danibi60
Utente Senior
 
Post: 179
Iscritto il: 11/07/13 09:21
Località: Bergamo

Re: Matrice per totale giornaliero per data

Postdi Anthony47 » 08/02/18 17:33

Puoi inserire la macro in un file di servizio (o in Personal.xlsm); poi apri il file del gestionale (col file di servizio aperto), selezioni il foglio con i dati e avvii la Sub DayRIEP.
Ti creera' un foglio nel file gestionale, che puoi salvare separatamente dal gestionale usando il comando Sposta o Copia attivabile con Tasto dx sul tab col nome foglio (scegli "Sposta il foglio selezionato... In una nuova cartella"; poi salvi come xlsx)

Per ottenere anche un "subtotale" per data puoi usare il comando Subtotale:
-selezioni ad esempio colonna C del riepilogo creato
-Menu /Dati /Gruppo Struttura, icona Subtotale
-scegli
>>Ad ogni cambiamento data
>>Usa la funzione Somma
>>Aggiungi Subtotale a Valore

Se registri una macro mentre fai queste operazioni ottieni il codice per fare l'operazione automaticamente; allora vai in coda alla Sub DayRIEP e aggiungi prima di End Sub:

Codice: Seleziona tutto
rSh.Select
'Qui copi le istruzioni che inserivano il Subtotale, quelle che seguono sono quello che ho ottenuto io
    Range("C6").Select
    Selection.Subtotal GroupBy:=2, Function:=xlSum, TotalList:=Array(3), _
        Replace:=True, PageBreaks:=False, SummaryBelowData:=True
End Sub

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: 15153
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Matrice per totale giornaliero per data

Postdi danibi60 » 09/02/18 15:39

Ciao Anthony,

ho seguito religiosamente Le tue indicazioni e ho creato, nel file allegato,l'estesione xlsm, al fine di poter vedere la macro e che ho modificato in quanto doveva tener conto che della colonna "Q" nella sottrazione che determinava il totale.

Ho poi creato una tabella pivot e ho messo i subtotali come da tua indicazione.

Come potrei notare, tra la pivot e il foglio con i subtotali vi sono delle differenze che non riesco a capire come possano generarsi visto che il foglio fonte è sempre lo stesso... puoi aiutarmi a capire dove sta l'errore?

Inoltre: fermo restando che poi utilizzi sempre questo file come matrice e copi ogni volta il file estratto dal gestionale per poter poi elaborarlo, come posso evitare - se utilizzassi la pivot come strumento per i subtotali per data- che crei ogni volta un foglio nuovo e quindi la fonte dati della stessa vada modificata ogni volta?... esiste un sistema più sicuro e veloce per aggirare questa operazione?

Potrei usare il foglio subtotale, e quindi fare in modo che mi si aggiorni in automatico quando copio il nuovo file dal gestionale?

Grazie e spero sempre di essermi spiegato con chiarezza,

https://www.dropbox.com/s/78tqsoaq46mjv ... .xlsm?dl=0

Danibi
"Chi ama un ranocchio non sa che farsene se al secondo bacio è già un Principe Azzurro."
Win 10 & Office 2007
danibi60
Utente Senior
 
Post: 179
Iscritto il: 11/07/13 09:21
Località: Bergamo

Re: Matrice per totale giornaliero per data

Postdi Anthony47 » 09/02/18 16:39

Non so su quali dati hai elaborato la tabella pivot
Ma se ricreo un riepilogo e su questo ricreo la tabella pivot le differenze scompaiono (e il nuovo riepilogo collima con quello da te calcolato).
Per la data 2/2/2018 la differenza e' sul codice 023-102908, che nella tua pivot viene riportata come 76,50 ma sulla tabella originale il Tot.Sped. e' di 71,46

Pero' la prossima volta queste verifiche falle tu :evil: , perche' "anche io" ho poco tempo a disposizione...
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: 15153
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Matrice per totale giornaliero per data

Postdi danibi60 » 10/02/18 09:59

Grazie Anthony

sei comunque sempre cortese e mi spiace averTi rubato tempo prezioso da altre attività sicuramente più interessanti.
Buon fine settimana,

Danibi
"Chi ama un ranocchio non sa che farsene se al secondo bacio è già un Principe Azzurro."
Win 10 & Office 2007
danibi60
Utente Senior
 
Post: 179
Iscritto il: 11/07/13 09:21
Località: Bergamo

Re: Matrice per totale giornaliero per data

Postdi Anthony47 » 10/02/18 13:52

Preeego; e ... alla prossima"
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: 15153
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Matrice per totale giornaliero per data

Postdi danibi60 » 20/02/18 11:50

Anthony47 ha scritto:Preeego; e ... alla prossima"


Ciao Anthony,
in relazione al file che Ti allego e per il quale mi hai supportato nella creazione della macro, Ti segnalo che quando la attivo (comando : ctrl + a) mi presenta una finestra di debug e questo nonostante crei comunque un foglio nuovo corretto.

Come mai? come posso fare in futuro per far si che ciò non accada?

Inoltre e per quanto riguarda la tabella pivot che avevo creato, volevo sapere se fosse possibile, o attraverso il comando della macro, oppure direttamente attraverso una modifica alle impostazioni della stessa che però ignoro, creare un totale progressivo così come l'ho creato io manualmente ma che non migra con gli aggiornamenti rimando bloccato nelle sue posizioni quando espando i campi... questo creandomi difficoltà nella lettura.

Infine, se non chiedo troppo, volevo sapere se fosse possibile evidenziare i dati che a volte e anche retroattivamente, si modificano affinché possa immediatamente verificare il delta e correggere poi le mie contabili con il nuovo dato.

Ora provo a fare un esempio relativo a quest'ultima richiesta:

Il dato che la macro, nel file che ti allego, in data 05.02.2018 alla spedizione n° 023 103070 era sino a ieri di valore €14,00 oggi è diventato di €7,00; ecco quindi che i totali e i progressivi si modificano.

vorrei sapere come posso fare, senza scorrere tutte le date, capire quale valore si sia modificato.

Spero come sempre di esser stato sufficientemente chiaro,

Grazie infinite come sempre,

https://www.dropbox.com/s/3ren5pqjsbbcn ... .xlsm?dl=0


Danibi
"Chi ama un ranocchio non sa che farsene se al secondo bacio è già un Principe Azzurro."
Win 10 & Office 2007
danibi60
Utente Senior
 
Post: 179
Iscritto il: 11/07/13 09:21
Località: Bergamo

Re: Matrice per totale giornaliero per data

Postdi Anthony47 » 20/02/18 15:46

L'errore si verifica su riga 4885 (l'ultima), che pero' ha un formato diverso da come dovrebbe essere (colonne Y e Z dovrebbero essere una posizione piu' a destra).

Per la nuova questione devo ancora vedere.

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: 15153
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Matrice per totale giornaliero per data

Postdi danibi60 » 20/02/18 16:25

Anthony47 ha scritto:L'errore si verifica su riga 4885 (l'ultima), che pero' ha un formato diverso da come dovrebbe essere (colonne Y e Z dovrebbero essere una posizione piu' a destra).

Per la nuova questione devo ancora vedere.

Ciao



Anthony ciao,

chissà come mai l'estrazione da gestionale ha creato questa criticità...farò verificare subito.

Grazie,
Danibi
"Chi ama un ranocchio non sa che farsene se al secondo bacio è già un Principe Azzurro."
Win 10 & Office 2007
danibi60
Utente Senior
 
Post: 179
Iscritto il: 11/07/13 09:21
Località: Bergamo

Re: Matrice per totale giornaliero per data

Postdi danibi60 » 25/02/18 08:55

Anthony47 ha scritto:L'errore si verifica su riga 4885 (l'ultima), che pero' ha un formato diverso da come dovrebbe essere (colonne Y e Z dovrebbero essere una posizione piu' a destra).

Per la nuova questione devo ancora vedere.

Ciao

Caio Anthony, come stai?

hai avuto modo di scoprire come si possa trovare una soluzione al mio quesito proposto?

"Inoltre e per quanto riguarda la tabella pivot che avevo creato, volevo sapere se fosse possibile, o attraverso il comando della macro, oppure direttamente attraverso una modifica alle impostazioni della stessa che però ignoro, creare un totale progressivo così come l'ho creato io manualmente ma che non migra con gli aggiornamenti rimando bloccato nelle sue posizioni quando espando i campi... questo creandomi difficoltà nella lettura.

Infine, se non chiedo troppo, volevo sapere se fosse possibile evidenziare i dati che a volte e anche retroattivamente, si modificano affinché possa immediatamente verificare il delta e correggere poi le mie contabili con il nuovo dato.

Ora provo a fare un esempio relativo a quest'ultima richiesta:

Il dato che la macro, nel file che ti allego, in data 05.02.2018 alla spedizione n° 023 103070 era sino a ieri di valore €14,00 oggi è diventato di €7,00; ecco quindi che i totali e i progressivi si modificano.

vorrei sapere come posso fare, senza scorrere tutte le date, capire quale valore si sia modificato."


Grazie e una buona domenica!
(non so da Te, ma qui è gelo e nevica)
Ciaoooo :) :) :)
"Chi ama un ranocchio non sa che farsene se al secondo bacio è già un Principe Azzurro."
Win 10 & Office 2007
danibi60
Utente Senior
 
Post: 179
Iscritto il: 11/07/13 09:21
Località: Bergamo


Torna a Applicazioni Office Windows


Topic correlati a "Matrice per totale giornaliero per data":


Chi c’è in linea

Visitano il forum: Nessuno e 22 ospiti