Hello...getting an 'argument not optional' message when testing first
attempt at DDB
Option Explicit

Dim cost As Double
Dim salvage As Double
Dim life As Double
Dim period As Double
Dim factor As Variant
Dim depreciation As Double



Private Sub Command1_Click()
salvage = 200
life = 10
period = 1
factor = 2
cost = CDbl(Text1)
depreciation = DDB(((cost - salvage) * factor) / life) * period
Label2 = Format((depreciation), "000.00")


End Sub

....any suggestions much appreciated.

nkp <weatheredwall@btinternet.com> wrote in message news:<bom66a$ff8$1@titan.btinternet.com>...[color=blue]
> Hello...getting an 'argument not optional' message when testing first
> attempt at DDB
> Option Explicit
>
> Dim cost As Double
> Dim salvage As Double
> Dim life As Double
> Dim period As Double
> Dim factor As Variant
> Dim depreciation As Double
>
>
>
> Private Sub Command1_Click()
> salvage = 200
> life = 10
> period = 1
> factor = 2
> cost = CDbl(Text1)
> depreciation = DDB(((cost - salvage) * factor) / life) * period
> Label2 = Format((depreciation), "000.00")
>
>
> End Sub
>
> ...any suggestions much appreciated.[/color]
You've probably already figured this out, but Stephane was explaining
in that line what the function does, not how it's called. You are
providing only one argument here, the result of a calculation. You
need to provide the four arguments specified and let the function take
care of the calculation.