Probably best to set up your own procedure here.....
Question? Are you wanting to round anything <= 3499 to 3000 and anything >= 3500 to 4000????? Please remember to give helpful posts the stars they deserve! This makes the post more visible to others in need!
Robert L. Johnson III, A+, Network+, MCP
Access Developer/Programmer
robert.l.johnson.iii@citigroup.com
Or something such.....Let me know if you need more help
''''''''''''' Start Code '''''''''''''
Public Function RoundToThousands(intNumber As Integer) As Integer
' Created by Robert Johnson III (mstrmage1768)
' for terpster on 10/02/02 Tek-Tips thread181-372668
Select Case Right(intNumber, 3)
Case 0 To 499
RoundToThousands = intNumber - Right(intNumber, 3)
Case 500 To 999
RoundToThousands = (intNumber - Right(intNumber, 3)) + 1000
End Select
End Function
''''''''''''' End Code '''''''''''''''''
Please remember to give helpful posts the stars they deserve! This makes the post more visible to others in need!
Robert L. Johnson III, A+, Network+, MCP
Access Developer/Programmer
robert.l.johnson.iii@citigroup.com
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.