Perform An Action On Each Record In A Table In Turn
May 30, 2006
OK, usually I can figure these things out for myself, but I'm realy stuck on this one and any help would be appreciated
background: I work in a small scale pilot production line, and we take a series of measurements for every part that we make, each of which has a unique ID. Sometimes we need to take the measurements more than once, so that the data output from the measurement system (which it can append straight to an access table) has a part ID and a measurement number, the combination of which is unique (for reasons that I won't go into it is not possible to combine them into a single field, otherwise we would do this)
problem: The measurement system can be temperamental and sometimes sends the same record more than once, and It is horribly time consuming to go through and check manually
It occured to me that we could send the measurements to table1 (where they would be stored temporarily), and write a sub to go through each record in table1 in turn, compare the part ID and measurement number to the records stored in table2 (where they would be stored permanently), and append the record to table2 only if the part ID and measurement number combo has not already been taken, before moving onto the next record in table1 and doing the same thing
The part I just can't figure out is how to go through the records in turn and compare them, I can do the append and deletion using SQL, that's not a problem.
if anyone can point in the right direction I'd be realy grateful (or tell me if I'm barking up the wrong tree completely)
I am having trouble making a command button do what I want. I have a subform within my form, but I only want it to appear when I click the button. I tried using the wizard but there is no option to open subform, only open form. Any thoughts would be greatly appreciated!
I have a report that in the Detail section on Format will change a record to a certain color based a criteria. (See VBA code below). I would like to put a text box control in the report footer to count the number of records that turn a certain color, this is what I have so far for the text box control -
=Count(IIf([PO Date]=RGB(0,255,255),True,Null)).
It returns a zero.
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) 'Set the backstyle to normal (default is usually transparent) Late_Ship.BackStyle = 1 If [Po Date] > ([Order Date] + 2) Then PO_Date.BackColor = RGB(0, 255, 255)
Hi there. Does anyone know how to use an update query to copy some records from one table into another? I have table1 which has all the contact details and what I would like to do is work out a process for importing records from an excel spreadsheet. What I have so far is as follows:
1. In access go into the queries tab and select update query 2. Open both table1 and table2 3. Drag the fields to be updated (table1) 4. In Update to select [table2].[table2 column name]
When i run this nothing appears to happen. 0 records are appended. Does anyone now how to go around this with another solution or should I be using other SQL methods?
i have an issue with the find record functionality
i have a main form that has a search button which works fine
i have a link to a popup form which in turn also has a search button but clicking this produces an error as below
run time error 2046
the issue seems to be the caused by the fact that the main form is still running in the background - if i open the popup form directly the search works fine
is there a way to get the search going on the po up form with the main form still running in the background?
I've rebooted my copy record button and just used the macro wizard for now, it seems to work as far as I can tell but there is something strange about it.
I've added in some text boxes so I've got some confirmation, but when I click this copy button I get the following error;
"The command or action 'RecordsGoToNew' isn't available now."
I use a Make-Table Action query to import data from a linked table into my database. The linked table is on a network server that is automatically updated.
One column of the linked table is named "QTY/PARTIAL" and approximately 10% of the 500 records have a "P" after a number i.e. 1000 P. I would like to separate the number and the P into separate columns in the new table to faciliate being able to compute the total number "QTY".
:confused: Anyone know how to trap/prevent the msg "The DoMenuItem action was cancelled" after answering no to deleting a record? I followed the instructions at the following thread but no luck:
---------------------------------- Private Sub Delete_Click() On Error GoTo Err_Delete_Click DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 Exit_Delete_Click: Exit Sub Err_Delete_Click: MsgBox Err.Description Resume Exit_Delete_Click End Sub
----------------------------------- Private Sub Form_Delete(Cancel As Integer) DoCmd.SetWarnings False If MsgBox("Are you sure you want to delete this record?", vbYesNo) = vbNo Then Cancel = True Else MsgBox "Record deleted!" End If End Sub -------------------------------------
i am wanting to find some way of turning off the menus and toolbars in a startup macro and is it possible to turn off the warning messages that appear when appending or deleting rows in a table. many thanks
I have a multi-user db. There are actually 3 computers all on a windows network that access the db, which is located on my hard drive. The computers are in different offices. I've asked the users to please close the db when they are leaving for the day - so that it does not remain open - and lock me out of design mode. But they sometimes forget and leave the db open. When I come in in the morning (I'm the first one here) I sometimes have to walk to their offices and close the db manually. Is there any way to close the app from my computer - so that all instances of the db are closed? Perhaps even a button somewhere with vba code that would do it?
Hi, I have a query with a 'many to one' join from a table of selected part numbers I want to look at which includes new part numbers with no current order numbers, to a master order table with all order numbers raised against all part numbers. The query returns null values for the new part numbers with no orders. This is what I want to see and the order numbers are stored as text.
I have converted these to numbers using CLng as I need use them in caluculations that only require adding or subtracting - (no DIV#0 issues). However, the nulls are returning '#Error' in the calculated fields which creates a type mismatch issue when filtering or setting other criteria. All fields used in the calculations are numeric.
I do not really have any knowledge of SQL, but is there a way to make the '#Error' values show as zero or something else I could work with.
I am using Office 2003. I tried entering this line of VB code : Dim Db As Database but got the following error : Compile error : User defined type not defined
checked the net, which said to open the module window, go to Tools>References and check the DAO 3.06 box... but it said in Office 2003 i dont need to do this...Anyway i tried looking at the references but DAO 3.06 is not even there... pls tell me what to do
I've had a search and can't find anything along these lines...
I've got some code which plays about with reports and it looks awful when it's running - is there an equivalent of Excel's "Application.ScreenUpdating = False" functionality in Access (2000)?
I'm not sure this would be allowed as it could be maliciously abused, but what I want to do is turn of warnings when a user fires up my DB.
What currently happens is a user gets 3 pop up warnings in a row the first time they use the DB with essentially the same warnings and "do you want to run this" questions.
The next time the user runs the DB they only get one warning.
On another thread I was told how to turn warnings on and off within the database: http://www.access-programmers.co.uk/forums/showthread.php?p=499732#post499732
'Turn warnings on & Hourglass on DoCmd.SetWarnings False DoCmd.Hourglass True
Code in routine that would generate warnings goes here.
'Turn warnings on & Hourglass off DoCmd.SetWarnings True DoCmd.Hourglass False
What I would like is some way to replicate the functionality for the DB. Is this possible?
I have made two main menus, one for admin and one for users, I want to turn these into switchboards. When you open a form asking you to log in opens if you supply the right password it opens another form depending on your access rights depends which menu it opens, it all works perfectly but I want a home button, i.e. close all open forms, which would close the main menu, so I need to turn the main menus into switchboards, I have tried searching this place and I have also tried google although I may aswell have stuck my head out an open window and shouted for help!
What is the best way to turn all the menu bars and tools bars off and back on when a form opens and closes? Can you just loop through the numerated objects?
How can I turn my DB into an Executable file, or "stand alone"...Id like to have the end users when opening the DB see only the forms and reports without the Access Background.
i need to be able to use "lookup", i have a set of postcodes from 3000 customers, i need to extract these and compare them to lists i have of postcodes, which make up a region. And run queries from these
e.g a customer on my database has the postcode BD21 7KK
On my list of postcodes i have on paper - WEST YORKSHIRE - BD21 7
therefore The BD21 7KK Customer falls in the West Yorkshire region.
I need to do this four 4 regions with lists i have on paper then run queries.
Can some one please provide the neccessary steps?
Or even give me an example made?
Im really stuck on this at the moment and me job depends on it ! :(
How to turn on double-sided printing through code but I actually have the opposite problem and I can't find any solutions that have worked.
In order to be as green as possible, our printers are set up for duplex printing.
I have an Access 2010 database that creates discipline notices. This report, no matter what I try, will not print multiple notices on separate pieces of paper. Because they are discipline notices and are handed out to the associates, they must print on separate papers to maintain confidentiality.
Whenever I double-click a graph in a form that is being viewed it opens up MS Graph in edit form. This is confusing/ugly/etc and I don't want it to do that.
I tried adding some code to the double click event to make it do some other action (bringing up some graph modification tools I created), but as soon as those are closed MS Graph will then open up in edit form.
How to turn this off? It's incredibly unprofessional.