Decimal problem

[Soegstad]

Hi
I am using a VBA code to update price and currency values in a drop down menu in a subform. My problem is that the decimals (i want 4) "disappears" through this code.
Does anybody have a solution to this problem?
This is the code I'm using:

Private Sub Product_AfterUpdate()
Me![Price] = Me![Product].Column(4)
Me![Currency] = Me![Product].Column(5)
End Sub

Thanks for your help.
Mads

 

[Mile-O]

Check either formatts or ensure that nothing (with respect to data types) is set to Long Integer when it should be set to Single or Double

 

[Soegstad]

Thanks,
seems like I messed up my formats
Mads