Search results

Hi - Suspect you're going to have to build your own. What are you attempting to accomplish? Bob

Hi - 1) Copy/paste the function to a standard module. 2) Create your query and, in design view, in a new field, place: ddhhnn_diff([MyStartDte],[MyEndDte]) ....substituting your actual field names. 3) Run the query. Bob

Hi - Try playing with this: x = datediff("n", #01/01/2009 12:30:00#, #01/02/2009 16:36:30#) ? format(x\1440, "00") & ":" & format((x mod 1440)\60, "00") & ":" & format(x mod 60, "00") 01:04:06 added: Used as a function: Public Function ddhhnn_diff(dtein As Date, dteout As Date) As String...

Hi - Take a look at this from the Code Depository. It might be helful. Best wishes - Bob

Hi - In the criteria cell of your date field, Between DateSerial(Year(Date()),1,1) And Date() ...returns records from current year to date, while Between Date()+1 And DateSerial(Year(Date()),12,31) ...returns the balance of the current year HTH - Bob

U.S. Daylight Savings Time ended at 01 Nov 09 0200 local time. Have you set your clocks back? Bob

Hi - Assuming non-workdays are Saturday (7) and Sunday (1), the following returns previous workday. I've used X to represent a date field. Replace this with your date field: Examples: Tuesday, 10/27/2009 x = date() ? x - IIf(WeekDay(x) < 3, 1 + WeekDay(x), 1) 10/26/2009...

Hi - Try this in the criteria cell of your date field: <DateSerial(Year(Date()),6,1))) HTH - Bob

Bob Larson - You beat me to it. Great minds must stumble along similar paths. Here's the solution I created. SELECT tblPhoneData.Field3, DateSerial(Right([Field3],2),Left([Field3],IIf(Len([Field3])=6,2,1)),Mid([Field3],IIf(Len([Field3])=6,3,2),2)) AS Expr1 FROM tblPhoneData; Best wishes - Bob

Hi - Suspect you're going to have further problems with this since "070809" is not considered (at least in my regional settings) as a valid date format. As a result, Access will interpret it as the floating point number representing a date, as stored internally by Access. Here's an example...

I don't have A2007. Please convert to an earlier version (A97 - A2003) and repost. Bob

Eeh? Something wrong here! It'd be a remarkable coincidence if your table was named tblClients1, as shown in my example. Try this: 1) Create a query using your table. 2) Add a calculated field (copy this directly) Upcoming...

Hi - Post your query SQL as it now exists and I'll attempt to modify it to accomodate my solution. Note: I've tested this solution against a table with LastName, FirstName and DOB and it has worked without a problem. Bob

If your intent is still suggest you give post #10 a try. Bob

Hi - Two possibilities: 1) Either of the two dates is missing. 2) End date is < start date Try modifying your query as follows:

Hi - Try saving this to a standard module, then call it from the debug (immediate) window as shown: Function DateDiffExclude(pstartdte As Date, _ penddte As Date, _ pexclude As String) As Integer '*********************************************...

Hi - Try this, replacing table name and highlighted field names to concur with your table. Note, allowing spaces in your table names, e.g. [Full Contact Details], adds an unnecessary level of complexity to your application. SELECT LastName, FirstName, DOB...

You might want to consider deleting all but one of your duplicate entries. Bob

Dave - See if you can do anything with this. HTH - Bob

Hi - Simple one-liner using the DateAdd() function: x = date() ? x 9/10/2009 y = dateadd("d", - weekday(x) +1, x) ? y 9/6/2009 HTH - Bob