Hello Folks
Någon som har någon ide.

Option Explicit
Private Sub Command1_Click()
Dim x As Long
x = 10 * 5000
End Sub
Så får jag Error 6 Overflow.

EDIT : Kom på det själv man måste skriva x = 10& * 5000
Tacksam för en analys "vofor blir det på dette viset"

/Sven

Vid beräkning hanteras varje tal som integer
om du inte explicit anger vad de ska hanteras som.

Gör så här när du har valt x som long
x = clng(10) * clng(5000)
Så blir det rätt

//Jenny

Tack Jenny Så var det har hört det förr men glömt.

Ha det
Sven