You can use the "Int" function in VBA to change any number to an integer.

e.g.
[VBA]Cells(CurrentRow,CurrentColumn + 2).value=Int(Rnd *9)[/VBA]