Search results

Much obliged to you, Pat. All the best.

A crosstab query gives the totals for students in particular classes per the Class they belong to, i e College A – Class1 4, Class2 12, Class3 17 College B - Class1 12, Class2 124, Class3 12 College C - Class1 5, Class2 16, Class3 7 College D - Class1 4, Class2 13, Class3 9 Etc etc...

All resolved, m'lord. But we missed you. Cheers

Many thanks, Rich and workmad3. Airborne, at last, Deo gracias - and you, and workmad3.

Hi Rich Thanks for your good pointing. I did it all again in that area and it's working. Phew! Very grateful. Forgive me, please, if I ask another question. The last 'If Then Else' refers to a field on the main form and back to a field on this subform. I was doing it with the...

On the subForm, frmWorkers.

Hi Rich Yes, I have it on Private Sub Form_Current() Actually, I've tried it there as a sub and also having the form_current() call it as a public function. I confess I have also tried it with and without those prefixes. It doesn't seem interested. (It's got so problematic that I've even...

Dear Learned MoP (as was) Do please look at ... http://www.access-programmers.co.uk/forums/showthread.php?p=405561#post405561 ... and tell me where I went wrong. I've spent hours on it, and tried every variation I can think of. Yours in awe Paul

Hi Keith Yes, it is of course a subform, and thanks for the advice, and I have delved through Guru McAbney's excellent tutorial. Hence the prefixes on my opener at the top of the page. However, doesn't make any difference to the function, sadly. Cheers

Workmad3 Do you think it might work if I approached it from the query with an IIf perhaps?

Unfortunately it doesn't work. I tried many variations of your suggestion. Before, this is the code that worked well on a previous form. If Me.DailyGrind.Value = "Dismissed" And _ Abs(DateDiff("d", Me.LastJobEndDate, Date)) >= 14 Then Me.DailyGrind.Value = "Available" Perhaps belonging to a...

Hi workmad3 This is an empty textbox - Forms!frmMatrix.frmWorkers.Form!WorkStartDate = " " So one of the things I tried was to change the code to If Forms!frmMatrix.frmWorkers.Form!DailyGrind = "Dismissed" And Abs(DateDiff("d", LastJobEndDate, Date)) >= 28 Then...

Why won't this work, Experts, please, either as a module or as a sub attached to the subform's Form_Current() ? If Forms!frmMatrix.frmWorkers.Form!WorkStartDate = " " And Abs(DateDiff("d", LastJobEndDate, Date)) >= 28 Then Forms!frmMatrix.frmWorkers.Form!DailyGrind = "Available" End If

Thanks very much for the advice and the new zip, John. I have it and will be looking into it asap. Very much obliged to you. Will report back ...

An update: When a new record begins, only a few fields are used, and each of these are on the main form. The result is that when the db is closed then opened, these records don't appear. However, if any field in one of the subforms has some sort of entry, then it works fine. An error message...

That is so brilliant of you, John. Many, many thanks. I'd been pouring over it for hours but couldn't find that fault. I do appreciate very much your excellent work. And, no, your names will remain as a tribute to you. Gratefully paul

Hi John Here's a chopped down version. Be most grateful if you could look. All the best paul

Yes, I noted that, and was most grateful, but unfortunately that's not simple. If I can think of a quick way, though, I will. Many thanks. Hope you had a good night. It's sweltering on this other side of the globe. Cheers.

Good morning John I felt in the end I should follow your example, so I have changed round the relationships in the db till it resembles yours. Sadly, the error remains where it was, only perhaps the fault is a little more clearly defined. Now the error says that the new entry cannot be saved...

Thanks, Obsidian, and Ansentry. Thanks very much for the example, Ansentry. A quick comparison is that property Record Locks is set slightly differently. I changed mine to yours, but that didn't improve things. Your forms go straight to tables and mine through queries, but I can't see that...