VBA Noob multiplication isn't working with decimal

I just started using VBA and WOW at the possibilities!! I have some data I am trying to calculate and decided upon researching VBA that this would be the easiest way to do what I need to.

The code goes through no errors but D2 is .0001 and N2 is 12000 and the answer I get when I multiply the 2 through VBA is 0.000 however if I change the number in D2 to 2 then I get 24000. I tried the help menu and possibly this is because I didn't do something right with the decimal?

Sub calctest()
Dim number1 As Integer 
Dim number2 As Integer
Dim answer As Integer

Sheets("Feeds and Diamters").Select

number1 = Range("d2").Value
number2 = Range("n2").Value

answer = number1 * number2

Range("r5") = answer

End Sub

Again keep in mind this is my first attempt at writing my own VBA code, so feel free to add comments to better my formatting and such.

Thanks for any help in advance