Access 2007-2019 Access 2000-2003 Access Seminars TechHelp Support Tips & Tricks Access Forum Course Index Topic Glossary Insider Circle

 Home   News   Courses   TechHelp   Templates   Forums   Help   Order   Contact   Logon More... What's New? Tips & Tricks Access Index Access Tips Excel Index Excel Tips Waiting List

 Glossary New Entries Added Almost Daily! Click here to get on our Mailing List
 Access    Excel    Word    Windows    HTML

# DSum

## Using the DSUM Function

In this tutorial you will learn how to use the DSUM Function.

Take an example Table of Customers.

CustomerT
CustomerIDFirstNameLastNamePhoneCustomerSinceCreditLimitDaysGraceIsActive
1RichardRost716555777701/01/201210011True
2JoeSmith716555343401/03/19905005True
3SuzanJones562436514602/01/199815002False
4AlanWatson419389121217/05/2012503True
5AnnaPicore71323647905/05/200510204True
6RonaldSimms780746546804/04/1992502True
7DonaldBarker416441555501/03/19982505True
8BennySperduti716726726206/04/199916007False
9PeteSmith564559777704/04/20005003False
10BarbraPeters829282728831/12/2005501True
11JoeJones549546546601/06/20045003True
14PezzDispo26/09/201204True
16BobSmith04/10/201209True

For this example we wish to total or return the Sum (Σ) of CreditLimit but only if the Customer is Active.

The DSUM function returns the sum from a specified set of records (or domain).

=DSUM(Field, Domain, Criteria)

The answer being \$3,421.00.

Query

The results using a Query would be

```	SELECT Sum(CreditLimit) AS SumOfCreditLimit FROM CustomerT GROUP BY IsActive HAVING IsActive=True;
```

FORM

In a Form you could set the Default Value of a Textbox to

```	=DSUM("CreditLimit", "CustomerT", "IsActive=TRUE")
```
VBA

In a Form add a TEXTBOX control and rename it "txtDSum", then you could add the following in the Load Event.

```	Private Sub Form_Load()
txtDSum = DSum("CreditLimit", "CustomerT", "IsActive=TRUE")
End Sub
```

Courses Tip

See this FREE Tip on DSUM.

Search

You can find more about this by searching the website.