VBA Not Following Consistent Rounding Rules?

This Subroutine:

Please Login or Register  to view this content.

Seems to behave differently each time it is called from my main Loop. As an example the first loop finds:
TotalTubes = 6
TubeRows = 4
TopRowTubeCount = 2
Where 6/4 = 1.5 and is rounded up to 2

The controlling variable in my code for Length is TopRowTubeCount and it is a Public Variable Dimensioned as an Integer

However on the next loop it finds:
TotalTubes = 210
TubeRows = 4
TopRowTubeCount = 52
Where 210/4 = 52.5 and is rounded down to 52?

I even used the round function for the TopRowTubeCount calculation and the erratic behavior continues. I know it's something simple I'm missing and I'm almost embarrassed to start a new thread for this purpose but whatever the cause it is stumping me.

Bizarre! I used the AsymArith Function from AlphaFrog's Link and just to be on the safe side dimensioned my numbers as Double and it fixed the issue. For reference the code looks like this:

Please Login or Register  to view this content.

It never ceases to amaze (and frustrate) me how taking simple things for granted can really affect how robust code is. Thank you both.