Re: Rounding to nearest 1000

Tech Tip: Click here to run a free scan for Windows Errors and optimize PC performance

From: "Ken Snell \(MVP\)" <kthsneisllis9@xxxxxxxxxxxxxxxxxx>
Date: Tue, 22 Aug 2006 08:28:32 -0400

Try it and you'll see .....

By the way, using another application's library, unless that application in
that version will always be available on the PC where your database is
running, is a problem waiting to happen because of broken references. It's
not usually a good idea to load up your application with such overhead for
such a simple function's use -- program your own or use the built-in ACCESS
VBA functions.
--

Ken Snell
<MS ACCESS MVP>

"Darrell" <dcyphers@xxxxxxx> wrote in message
news:u0Kk7daxGHA.3788@xxxxxxxxxxxxxxxxxxxxxxx

Ken Snell (MVP) wrote:

CInt(YourNumber / 1000) * 1000

Thank you, Ken. The only catch is that, unless I misunderstand this, I'm
going to get the next LOWER 1000, rather than the NEAREST 1000. If
MyNumber is 3900, dividing by 1000 will give me 3.9. CInt will give me 3,
and multiplying by 1000 will give me 3000. What I would like in this case
is 4000.

Darrell

Follow-Ups:
- Re: Rounding to nearest 1000
  - From: Gary Walter

References:
- Rounding to nearest 1000
  - From: Darrell
- Re: Rounding to nearest 1000
  - From: Ken Snell \(MVP\)
- Re: Rounding to nearest 1000
  - From: Darrell

Prev by Date: Re: query from form
Next by Date: RE: Union 2 fields where values are counted?
Previous by thread: Re: Rounding to nearest 1000
Next by thread: Re: Rounding to nearest 1000
Index(es):
- Date
- Thread

Relevant Pages

Re: Import/Export Multiple Excel Files to Access
... Your MacExcelInput macro should have just a single action in it: ... <MS ACCESS MVP> ... "Ken Snell " wrote: ... Dim strPathFile As String, strFile As String, strPath As String ...
(microsoft.public.access.macros)
Re: Export by group to a specific folder and name
... <MS ACCESS MVP> ... "Ken Snell MVP" wrote: ... ' Get list of ManagerID values -- note: ...
(microsoft.public.access.externaldata)
Re: Union All query truncating
... Ken Snell ... <MS ACCESS MVP> ... Then you use a UNION ALL query ... GROUP BY statements or other situations known to cause truncation. ...
(microsoft.public.access.reports)
Re: How do you dump the contents of a query into an Excel speadshe
... Dim strSQL As String, strTemp As String, strProd As String ... "Ken Snell " wrote: ... <MS ACCESS MVP> ...
(microsoft.public.access.queries)
Re: Union All query truncating
... <MS ACCESS MVP> ... and it is still truncating on the query. ... "Ken Snell " wrote: ... that may be the source of the truncation. ...
(microsoft.public.access.reports)