Buongiornoa tutti,
mi sono iscritto. da poco e spero che questo sia il posto giusto per fare la seguente domanda:
ho creato un report in access dove ho inserito una serie di totali che mi serviranno a creare una patrimoniale, sono riuscito a fare quasi tutto ma non riesco a sommare solo i valori negativi e poi solo i valori positivi di una colonna che porta il saldo tra il dare e avere riporto di seguito la mia formala completa sperando che qualche persona mi aiuti:
Private Sub Report_Load()
Dim Carisp1, Carisp2, Carisp3, Carisp5 As Currency
Dim Carisp6, Carisp7, Carisp11, Carisp13 As Currency
Dim Carisp8, Carisp9, Carisp10 As Currency
Dim Carisp12 As Currency
Dim Carisp20 As Currency
Carisp1 = DSum("Importo", "PatrimonialeGenerale", "NonPagatoGestCorrente = -1")
Carisp2 = DSum("Importo", "PatrimonialeGenerale", "NonPagatoGestPrecedente = -1")
Carisp3 = DSum("Importo", "PatrimonialeGenerale", "FatturePagateGestionePrecedente = -1")
Carisp4 = DSum("Importo", "PatrimonialeGenerale")
Carisp5 = DSum("AnticioiFineGestione", "AnticipiFineGestione")
Carisp6 = DSum("Importo", "PatrimonialeGeneraleB", "AssociazioneTab.ID = 15")
Carisp7 = DSum("Importo", "PatrimonialeGeneraleB", "AssociazioneTab.ID = 14")
Carisp8 = DSum("RimanenzaCassa", "AvanzoCassa")
Carisp9 = DSum("Importo", "FondoImmobiliare")
Carisp10 = DSum("RimborsoAssicAccantonato", "RimborsoAssAcc")
Carisp11 = DSum("Importo", "PatrimonialeGeneraleB", "AssociazioneTab.ID = 13")
Carisp12 = DSum("TotaledaPagare", "Consuntivo")
Carisp20 = DSum("Patrimoniale", "Consuntivo") in questa riga dovrei ricavare la somma dei valori negativi
Carisp21 = DSum("Patrimoniale", "Consuntivo") in questa riga dovrei ricavare la somma dei valori positivi
Cap1 = Carisp1
Cap2 = Carisp2
Cap3 = Carisp3
Cap4 = Carisp4
Cap5 = Carisp5
Cap6 = Carisp6
Cap7 = Carisp7
Cap8 = Carisp8
Cap9 = Carisp9
Cap10 = Carisp10
Cap11 = Carisp11
Cap12 = Carisp12
Cap20 = Carisp20
End Sub
Ringrazio anticipatamente per la cortese attenzione.
Marino