I have an Access database from which I would like to print a MailMerge. The code I am using runs on a click event from a form in Access. It launche Word, opens the template into which the data is merged, and sucessfully completes the merge. The problem comes when I attempt to print the merged...
Adapting some code I got here last week for another database (in which it is working well) I am having a problem opening an Access database to do a mailmerge in Word. The database that can't be open is the one that is calling the mail merge. Here is the code with the porblem area in red...
I have never used the Shell function before, so I am not certain just how to get done what I need. I need to open Word from Access, then open a form letter template that gets its data from the Access database from which I am opening Word. Then merge the data and print the letters. I can open...
I have a temp table, tblTempInv with 43 fields. This table is created each morning and inventory is added to it or subtracted from it numerous times each day. I need to be able to make those additions and subtractions in code to increase the security of the numbers, and prevent editing of the...
I have a table storing information about different drugs in inventory--number of unopened vials and amount in the one opened vial. The fields are named by the drug number and a "V" or "O" following designating full vials and volume remaining in the open vial. (1V, 1O, 2V, 2O, etc) I would like...
I have a table (tblInvUsed) with a field called CaseNum which contains multiple records for one CaseNum. In a Class module from a form (frmCaseEntryDr) I want to open this table and check the set of records with the same CaseNum that is active on the form for certain drugs ordered for a...
In the following code, I get a compile error, "Loop without Do". What would cause that?
Private Sub txtSurgeryID_LostFocus()
Dim db As Database, rst As Recordset
Dim strName As String, intResponse As Integer
strName = "tblSurgery"
Set db = CurrentDb...
I am trying use datea from 2 recordsets to make calculations and append that information into a 3rd recordset. When I try to open the second recordset using the OpenRecordset method with an SQL statement, I get and "Error 3061: Too few parameters: Expected 1". Here is the code:
Dim db as...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.