Recent content by kengooch

So I have 5 staff members that are each assigned patient cases based upon the last name of the patient, but their assignments will also be calculated off of the total cases. So if there are 94 cases, each staff member gets 18 cases. So I calculate the total staff cases load automatically in...

I need to count the total records on a form that is filtered by Staff Member and then within that filter, I need to total all records where the expiration date is 1 week out. I filter the form based upon the name in Column "A" using VBA Code. I can Count the total records on the filtered...

The problem is the query is modified by the Multiselect list boxes that give the user the ability to do dynamic record selection. For example, they can look at records from a specific year or quarter, they can choose by disease type, by the physician providing the care, by the first onset of...

Not sure how to go about that. I looked it up on the Web... If you have any hints I would appreciate them.

I have been exporting reports to excel, but it brings over all the formating. Is it possible to just send the data that has been filtered in ascii text only to a excel workbook? Here is the code I am currently using. The Form from which the data comes is filtered by a series of 5...

So here is what I came up with today while waiting. It also walks through the existing emails to allow the user to pick the specific one they want. Sub sortItems() 'Assign Variables Dim olApp As Outlook.Application Dim olNs As Outlook.NameSpace Dim olFldr As Outlook.Folder Dim...

Thanks so much. Do you know if there is any place that provides a list of the Field names as they need to be called in vba and/or the alternate numeric codes, as you used with the GetDefaultFolder(5). For example folders("Inbox") vss folders("SentItems") etc. I can't seem to find the lists of...

Were you able to clean up that code you mentioned so you can send it?

Thank you so much! This sounds really good. I am sure i can edit the code as needed. Look forward to what you will send!

Not really, to have all of the names and everything in place is very helpful, plus some of the statistics given I have to calculated the differences between yesterday and today and in some cases provide a percentage. This is done everyday, even if the macro only saved me a 3 or 4 minutes, over...

I have a report that I send out each day about Staffing and Metrics. The email staff names and Metrics categories rarely change only the actual numbers. What I need to do is find the previous report in the Sent Mail folder by finding it by the Last Date Sent where the Subject has the Partial...

We collect data on patient transfer in a worksheet name 2022-11-01 Patient Transfer one sheet for each day. We use the CELL("filename") function to read the file name and parse off the date from the file name. From that date we calculate How many days spent in the hospital. We did this...

Didn't work... I tried adjusting the format to m/d/yyyy and several other versions... but no luck

This is the one that doesn't work... It always generates not results. In the query box it says "#" & [Enter Date] & "#" The SQL is: SELECT qEvntComplete.tEvAccCat, qEvntComplete.vStfFullNm, qEvntComplete.tEvAccSeq, qEvntComplete.tEvStDate, qEvntComplete.tAccName, qEvntComplete.tAccCat...

Yes but when you put in a date, it gives you no results. In another tool I built a few years ago I used this... Between (IIf(IsNull([Start Date m/d/yyyy]),#1/1/1900#,[Start Date m/d/yyyy])) And (IIf(IsNull([End Date m/d/yyyy]),#12/31/2200#,[End Date m/d/yyyy])) which works but requires you to...