Search results

Does this work for you? I haven't tested it. I did a search in the help file within the VBA IDE for "diagram" and came up with the Alldatabasediagrams collection. This code was there. Sub AllDatabaseDiagrams() Dim obj As AccessObject, dbs As Object Set dbs = Application.CurrentData...

I think I may have an understanding. basically you want to loop thru your table 3 records at a time, if any of them have a type of 6 or 7, add all the records. If not, move on to the next set of 3. Am I understanding this correctly? Dim rs As ADO.Recordset 'Assume you already have everything...

if you are using an ADO recordset you could, while looping with your records already sorted in order. do until rs.eof if isnull(rs.fields("YourFieldHere").value) then 'Do nothing else LastName = rs.fields("YourFieldHere").value end if loop Thus making the LastName value stay the same when the...

I like it much better than mine, faster and more elegant. Less code. I only learned about Split() a year ago and as you can tell I wrote this one in 2005. Thanks.

Maybe post your code so others can see what is going on?

Type mismatch is given usually when you try to compare different types of data. I.E. you try adding a string to an integer or something like that.

I would just like to point out that opening a database on a shared drive is a BAD idea. In my experience this is the fastest way to corrupt your database. What happens when two people open it at the same time? Whenever I need to share data I use the FE / BE method.

No. Just . doevents then whatever your procedure is that is making you freeze up.

This isn't a 100% solution but shows you how to do it. Dim OutlookMessage As Object Set OutlookMessage = CreateObject("Outlook.application").createitem(0) 'Repeat the following line for every file you want to attach to the Message OutlookMessage.attachments.Add "C:\Reports\" & "HIPRI.rtf"...

Have you tried doevents?

Sorry for the Goto in the code, I dont usually use it but I needed to get it done. This function is not standalone, ahtCommonFileOpenSave() I put in another module. It's a wrapper for the.. you guessed it Common File Open / Save dialog box. This particular one was from a book; ' Code...

If you use the model I described, this could be accomplished easily. I am assuming you are tracking employees? tblEmployee EmpoyeeID FirstName MiddleName LastName AddressID Dependant DependantID FirstName MiddleName LastName AddressID tblAddress AddressID...

My dates were 1/1/2006 11:10:33:255 and 12/12/2007 12:11:34:255 so I had to account for a whole bunch of possiblities and basically it had to be 2 char to the right of the 4th special character. And also I had a normal date in there sometimes as well, 1/1/2006 11:10:33 and 12/25/2007 08:30:25.

So does it work after you have set the references? I wrote a function at work that will get the list of references and add a reference that I know I need if it's not a default reference. I'll post it tomorrow if you need it does indeed work after you add the reference.

I don't know if you got arround your date problem yet but I wrote this a long time ago. All you have to do is wrap your date in it and it comes out a date that MS Access likes. I had to account for more than just a . in my dates but this should work for your date problem too. Public...

What Starman is saying is you need to understand a term called "NORMALIZATION". You need 3 tables, one for your "Employee" ? One for your employee's dependents, and one as a relational table for your employee and his dependants, unless you are sure you will only want information about his...

It think this might be what you are looking for. It is vb but you could adapt it to vba. You would need permissions to set the time / date on your local computer in order to accomplish this. http://vbnet.mvps.org/index.html?code/network/netremotetodsync.htm I am interested in what you come...

Gazza, I'm guessing that you want to have this as some sort of cue to validate your current record manually by looking at all the values on the screen? If so I'm wondering if can't validate your record automagically with VBA eliminating the need for this code? I can give you a partial answer...

Send Event - Use Word Grammar Checker My little project that I was trying to figure out here was this. My company policy has the Word Editor disabled for use in outlook. So in order to use the grammar checking abilities of MS Word, one would have to open a word document, copy the email into...

I found it by accident. This is the correct event.