Search results

I suppose it is too late to drag the database designer into a dungeon, and have a long talk? ;) In a perfect world, the table would have been designed as: Station (int) TestDate (date) TestResult (Yes/No) as opposed to Pass/Fail If the current design cannot be changed, you need to...

I think the problem might be with the connection to the table and not the UNION query per se.

What happens when you use the following... Set db = Currentdb Set rs1 = db.OpenRecordset(strSQL) Still a problem with the UNION query?

Two options that I can think of... 1) Use macros instead of code. [Cough/sputter/ack...] Excuse me while I go wash my mouth out with soap. :eek: 2) After you have pasted the controls, go each of the controls' properties. Access the events....the code will magically re-appear....unless...

I think the repetitive opening, writing to, and saving the ever-increasing Excel file is the time killer. Open the summary file once, traverse the array of passed data, write to the appropriate rows. Save the file. Take the rest of the day off. The problems are: 1) While I am writing to...

Is it possible for a PartID to be the same as a KitID or ProductID? I'm reffering to the ID value. If they are all unique, then my OrderDetail would look like ID (which would be PartID, KitID, or ProductID) Quantity .... I'd also consider putting the Parts, Kits, and Products into one...

The summary "data base sheet" is an Excel Workbook, correct? It has the look, taste, and feel of an MS Access table. In my simple make-believe world ;) , my users have Excel files with 3 columns of data. Col A: This Col B: That Col C: The Other Thing Col A is a unique identifier for a...

The VBA object didn't hurt.... ;) Are any references missing when you examine the code on the Win2K boxes?

This doesn't sound right.... Is it possible to post a copy of the DB with all confidential data removed?

Are you missing a reference when you check the code under the Win2K boxes? I typically type the objects and the functions... Does the following cause an error? Assuming you declare sTest as a string.. sTest = VBA.Environ("USERNAME")

An overflow error occurs when a passed value exceeds the capability of the receiving variable or field. Q1) You included the "With Me" and "End With" lines, correct? Q2) What are the control names on your form? I assumed the control names were from your original message. Q3) What type of...

The Nz (NullZero) function takes two arguments., a control name and a value if the control is null. The code examines the two controls that you initially mention Mainarea and Unitval. The values of the two controls are multiplied and the result is passed to portionval. If either of the two...

I'm a little concerned that Mainarea and Unitval might be null. I'm using the Nz function as a safeguard. I'd put the following code on the OnClick event for the command button. With Me .portionval = Nz(.Mainarea,0) * Nz(.Unitval,0) End With

Are you calling the Insert query for each line in each workbook? I am assuming the Summary workbook is closed after each insert? This might be where the timelag exists. I would try to break this task into two parts. 1) Gathering the information from the 18 (?) Excel workbooks. I usually...

One of the form properties is AllowFilters. If you set it to False, users should not be able to filter the form. As far as queries and tables....I don't think you can stop them, unless you modify the menus and toolbars within the application.

Consider using the OpenArgs argument when you open the form. From frmMainMenu, I open frmTest this way... DoCmd.OpenForm FormName:="frmTest", OpenArgs:="MM" From frmOther, I open it this way... DoCmd.OpenForm FormName:="frmTest", OpenArgs:="Other" Within the frmTest I code the Form_Load...

I think the trouble is with your quotation marks... If txtBal is numeric, your expression ought to be.. =IIf([txtBal]<0,"Under Budget",IIf([txtBal]>0,"Over Budget","On Budget"))

I missed by this much.... No seriously, I tried the Search capability..... after I posted my old code. ;) You're right. Environ works much better, with less overhead. Do you have a list of the explicit variables that may be interrogated through ENVIRON? Other than PATH and NAME...

Or we could do as gHudson suggests and use the Environ() function call.... Quoting gHudson... MsgBox Environ("UserName") MsgBox Environ("ComputerName") No seriously, I tried the Search capability..... after I posted my old code. ;) Please ignore. Wrong thread....

I sense doubt from you. ;) Consider the following... Public Sub Test() On Error goto Err_Test Dim xlApp as New Excel.Application With xlApp .Workbooks.Open Filename:="C:\Temp\MasterSummary.xls", _ AddToMRU:=False .ScreenUpdating = False...