Search results

Thanks Brian - How should I spell redundant? I'd forget I'd put in the Code Repository (a couple of years ago) till you pointed it out. Old age seems to be starting to take its toll. Best wishes - Bob

Hi - This function will allow you return age in years based on specified date, or the current date (see the 3rd example). In your query try creating a calculated field, e.g. CurrAge: fage2([DOB]) then, in the criteria cell >= 18, or whatever age you want to include. Function fAge2(DOB As...

Hi - Try working with something like this: >= dateadd("ww", -52, dateserial(year(date()),12,31)) HTH - Bob

Hi - Try this: Function fAgeYMD(startdate As Date, EndDate As Date) As String 'Purpose: Returns the difference between StartDate and EndDate in full years, months and days 'Coded by: raskew 'To call: ' ? fAgeYMD(#7/6/54#, #10/3/84#) 'Returns: ' 30 years 2 months 28 days Dim intHold As...

Dave - Thanks for your quick response. I appreciate it! However, I'm still a little mystified. Do you have a solution for this monster? If so, go slow, since I'm a little slow. Best Wishes - Bob

Hi - I've asked this before, with no responses. Figured I'd give it another try. Working on a Toshiba laptop, using XP, the feature that allows one to step thru a function and place the cursor over a defined value, which is then highlighted and displayed does not work. Makes troubleshooting...

Great! Love it when a plan comes together. Best Wishes - Bob

Hey John - Where does factorial() come from? If it's a function of your making, please post it. Bob

Hi - For starters, give this a try: Public Function fGetWorkdays2(pstart As Date, pend As Date) As Integer '************************************************ 'Purpose: Compute number of workdays (Mon - Fri) ' between pStart and pEnd 're...

Try the mid() function. x = trim(mid([myfield], 9)) HTH - Bob

Hi - If your example (1152009) is accurate, rather than 01152009 or 11052009, I think you've got a serious problem unless there's some other indicator in your table that would allow you to distinguish between 15-Jan-2009 and 5-Nov-2009. Here's how the DateSerial() function could be used: x =...

Hi - Your query obviously works, but I've got to ask a question. Format([ARCHIVETIME],"dd/mm/yyyy hh:nn") AS ND returns a string, e.g. This, from the debug window, returns a Type Mismatch: x = format(now(), "mm/dd/yyyy") ? cdbl(x) So the question is, how can you take a date/time which has...

Yeah, for sure! That's what I thought. An explanation as simple as what Namliam provided could clear up a whole bunch of confusion. Bob

Hi - If you would post a page or two of the Excel spreadsheets, we can probably provide an automated method of populating properly normalized tables. Best Wishes - Bob

Hi - Here's an example using Northwind's Suppliers table: SELECT Switch(SupplierID= 1, "Alpha", SupplierID =2, "Bravo", True, "Other") as test, Suppliers.Country FROM Suppliers; HTH - Bob

Thank you! That solves the mystery! Just couldn't see what those seemingly random letters represented. Best wishes - Bob

Hi - Understand that it's sending keystrokes. But, the referenced site still doesn't explain that Alt-FMC will initiate the Compact action. That's what I'm attempting to find. Thanks for your response. Bob

Thanks Dave for the quick response. What you found is exactly what I came up with, which still doesn't answer the question. Best Wishes - Bob

Hi - There are various codes used in conjunction with SendKeys, e.g. SendKeys "%(FMC)", False to Compact. Where are these codes found? Have checked the Help File, the Microsoft site and have come up zero. Your wisdom appreciated. Bob

Sorry - Rename the first query to 'QryLenStay'. Bob