I know this can be done but I'm a novice at VBA. I have a batch file AutoLoop.bat which I run from command prompt at the moment. The idea is to run a VBA routine behind the onClick event of a command button in Access which would run this batch file in command prompt automatically. Say if the batch file path is I:AUTOGENLOOPGENAutoLoop.bat, what VBA code can be used.
In the past I've used command buttons with both VBA & Macros to bring up a prompt to save or discard changes to the current record then close the current form.For some reason, on just one single form that I just created, none of the techniques seem to work. It will close the form but will automatically save changes without bringing up a prompt. I've tried creating buttons from scratch, trying out both Macros & VBA, and I've tried copying/pasting buttons from other forms--of course making the appropriate changes.
Being physically disabled & using a headpointed to type & point to things on the screen so-so often I need to adjust my column width. How I can create a short cut/hot key to prompt the Column Width command?
This is code in a command button on a form to preview a report. DoCmd.OpenReport stDocName, acViewPreview, "Control Room Query", "[Lot #] = Forms![Hydro COA]![LotNumber]" What could I change in this code to use in a different command button to have the report sent as an attachment in snapshot format in an email? The user would have to fill in the address, subject and body of the email. Thanks much!
Hello. Your help is very much appreciated. I want to launch the "partial replica wizard" from code. Can it be done? (It is located in Tools -> Replication ->partial replica wizard
I have two text boxes and a check box - so the user can enter (1) patient weight, (2) patient height and then check whether the patient is male or female. The first two are then used to calculate a Body Mass Index. (simple enough and works OK). What I then want to do is have four command buttons that become visible when the calculation is within a certain range. So - simplistically- if the calculation (calctxtbox) is between 0 and 5 AND the patient is female then the command button called "normal"(Command79) is enabled. My VB code writing is improving (thanks largely to this forum!) but still very basic - can some-one help please?
Do I put my code in the "after update" event of the calctxtbox?
Private Sub calctxtbox_AfterUpdate() If calctxtbox > 0 (How do I say and <5) and then how do I say Female =Yes Then Command79.Enabled = True End Sub Am I close? Also can you enable labels and text boxes or just buttons.
Hi! I have a cmd Button in a form that onclick is suppose to open the selected record in a specified form. My problem is when the specified form opens it doesn't have any data in it. Any thoughts would be much appreciated!! Here is the cmd button code i used:
Private Sub Command14_Click() On Error GoTo Err_Command14_Click
Dim stDocName As String Dim stLinkCriteria As String
i have a form that pulls in a subform specific to the CurrentUser(). It is meant to be a shortcut or favorites form that holds 8 command buttons. I have Dlookups on the form to pull the correct fields from a table for OpenForm or OpenReport and then the name of the form or report they want to open. My froms work but when i try and open a report, it just prints the (correct) report and does not open it. I just want to open it.
Private Sub cmdBtn1_Click() If Me.btn1Action = "OpenForm" Then DoCmd.OpenForm Me.btn1Details, acNormal, , , acFormAdd, acWindowNormal Else If Me.btn1Action = "OpenReport" Then DoCmd.OpenReport Me.btn1Details, acViewNormal, , , acWindowNormal Else End If End If End Sub
I have created command buttons to enter event registration information after biographical information has been completed. When I click on the button I get the following error message:
"Microsoft Office Access cannot find the field '|' referred to in your expression."
This is the On Click code that I have in there. Can anyone spot the error of my ways?
Private Sub RegisterButton_Click() On Error GoTo Err_RegisterButton_Click If IsNull(Me![AttendeeID]) Then MsgBox "Enter attendee information before registering for an event." Else DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 DoCmd.OpenForm "Registration", , , "[Registration]![RegistrationID]=Forms![Attendees]![Attendees Subform].form![RegistrationID]" End If
Exit_RegisterButton_Click: Exit Sub
Err_RegisterButton_Click: MsgBox Err.Description Resume Exit_RegisterButton_Click End Sub
I have a mainform with just two fields (Name and State) and then a subform, I want to be able to enter students name or state on a field in my mainform and click on FindStudent, and it displays the record on my subform.
I also want to have a AddNew record button on my main form, and when it's clicked, i will be able to enter data into the underlying table using my subform.
How do i achieve this? Any input will be greatly appreciated. Thanks :) :)
Per the instructions detailed here... http://www.fontstuff.com/access/acctut08.htm
...I created a parameter query in the form of a drop down box that uses a command button to produce a query.
The code is as follows:
Private Sub cmdCreateReport_Click() DoCmd.OpenQuery "qryUIRFollowUp", acViewNormal, acEdit DoCmd.Close acForm, "frmOpenUIRLookUp"
End Sub
This produces the data I need in datasheet view. I want to use this same data to populate a form I've created that will use the above data as a springboard to add more data to another table (also connected to my form).
So what code do I need to add to the above so that along with producing the data the command jumps right to the next step and feeds this data into the form and then displays that form?
I now want to change where it says "Qry BM to Management" to "Qry Tom to Management",
Example with Command Query:
Again Textbox Contains Tom
Query has been copied but now i want to change the following SQL string from where it says Bhavins Table to Toms Table
INSERT INTO [Management Table] (Postcode) SELECT [Bhavins Table].Postcode FROM [Bhavins Table];
Im not sure if this is possible but i would like to know as adding a new user to my Database takes me about 10-15 minutes but I know what im doing (copy paste change specific parts of Queires and points of forms etc ) but i need to make it easy for management to add new Users....
I am at my Login Screen, I want it to return to the Login Screen if you select "NO" and Close the DB if "YES"
Here is my current code:
Private Sub Form_Close() If MsgBox("Would you like to EXIT the Database?", vbYesNo, "Quiting Database") = vbYes Then Application.Quit Else ??? End If End Sub
Often I use Labels as buttons due to the fact I can colour them the way I want, and use the on click event to trigger code. The code below however works for a command button, but not a label button.
DoCmd.OpenForm "frmdatetime" Do While Forms!frmdatetime!OKFlag.Caption = "False" DoEvents Loop
When this code is run by clicking on a command button, it works fine. If run by clicking on a label, frmdatetime opens, but the mouse will not work on either of the 2 open forms unless you go down to the windows task bar, jump onto another window, and back onto frmdatetime. If I remove the loop with the DoEvents in it, then the problem does not occur.
Can anyone enlighten me as to why this behaviour occurs.
I am rewriting an old Access 2003 database in Access 2010. When creating new command buttons, the current theme gives them a default appearance. I need to apply this appearance to old command buttons. I know there is a way to select the default button and apply its properties to others quickly. I have done it before but didn't write the process down .
After I do a "DoCmd.RunSQL "Update ..."" I am asked if I really want to perform the 'Update'. Does anyone know if there is a way to get rid of the prompt and just carry out the query?
I have noticed that when i am editing an object within my database, specifically a query and click to close it, it doesn't prompt me to save the changes and does it automatically. There have been cases where i do not want to save the changes and just wanted to know if there was a simple setting to turn off automatic saves?
Is it possible to put a combo box with a drop down list in the Enter Parameter Values of an update query so that the user selects from the list instead of typing the required value?