Search results for query: *

Dan, Thanks for putting me in the right direction! Don

Hi Steve, Thanks for the quick response & fix suggestions. Moving my detail fields into the footer section did the trick, however, my job totals still include the unwanted records. Is there a way to only include the actual records in the job & grand totals? Don

I have 3 tables with the following relationships: TimeCards JobIDCodes PhaseIDCodes There is a one to many relationship between JobIDCodes & TimeCards There is a one to many relationship between JobIDCodes & PhaseIDCodes In the detail section of my report, I'm getting additional records...

Michael, I think I finally sorted this out myself. After some Help research & trial and error here's the solution I came up with: Used a Make Table Query Set the query property for Unique Values to "yes" Established a query on the ImpJobID table Set the Criteria in the query to...

Hi Michael, I tried your suggestion but can not get it to work. I always get zero rows updated. The only way I can get an update to work is when there are JobIDs in the new table's JobID field. However, my new table will not contain any JobID information initially. It's a blank table. I'm...

I have a table called ImpJobID which has been records imported from an Excel spreadsheet. It contains two fields called JobID & Description. When the table is imported from Excel, one JobID can appear multiple times in the ImpJobID table. I would like to remove the duplicates using VBA &...

I did try your suggestion but didn't have any success. I then went back to a saved prior version of my DB which did function properly & updated it for changes to bring it current. I then tried your approach & it now works fine. I have discovered a virus on my system & wonder if that had...

Thanks for your quick response. I must have somehow changed a setting. Much appreciated!

When I opened my database this morning, I noticed seven tables which were not there yesterday. They are: MsysAccessXML MsysACEs MsysIMEXCOLUMNS MsysIMEXSPECS MsysOBJECTS MsysQueries MsysRelationships What are these Tables? The icons are grayed out but appear to be part of the DB and I guess...

Yes, I have various code snipets doing what I have described above. The Subform is a single form to show one record at a time. The combo box has the following lost focus event: If Len(Forms!TimeCards!cboEmployee & "") = 0 Then MsgBox "You must enter a valid...

I have a unbound combo box on a Main form using a Select statement to populate the combo with employee numbers from the Employee table. The Main form does not have a Recordsource. I would like to have all the child records for the employee selected in the unbound combo appear in the Subform...

Hi Ken, I appreciate your help & I used your suggestion, but I had to get down to the Subform level for checking fields. After a few days of frustration, the code I ended up with is as follows: Set ctl = Me.Controls Set ctlSubForm = Forms!TimeCards!TimeCardsSubform For...

I have found the following code on a previous Tek-Tips thread provided by Rick39 & have incorporated it into the click event on my Save button located on my subform. Dim currctl As Integer, numctls As Integer Dim ctl As Control numctls = Screen.ActiveForm.Count For...

Hi Roy! I just tried your suggestion - it worked great. I wrestled with this problem for two days & it took you no time at all to sort out. Where does one learn about these quirks. I appreciate & give you a star!

I have a combobox on th main form (TimeCards). I want to check if the field has been left blank before the user proceeds with anymore data entry. So on the Lost Focus event I have the following code: If Len(Forms!TimeCards!cboEmployee & "") = 0 Then MsgBox "You must...

Hi RoyVidar, Thanks for your help & pointing me to the thread. The info was very helpful, however, I'm still having a problem. I took you suggestion about calculating dates before entering them into query. I now use a date variable to represent the date. When I run the code in the Watch Window...

I have been trying to use a date variable in a stored SQL statement but keep getting "Too few parameters Expected 1" errors. I get this error because the rst is emtpy but everything I have tried doesn't correct the problem. Here is the code I'm using: Dim db As Database Dim rst...