DDB again

[nkp]

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.

[Kate]

nkp <we***********@btinternet.com> wrote in message news:<bo**********@titan.btinternet.com>...

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.

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.