I thought I had my login form really locked down by turning off all the navigation buttons including the control box and close button. I also disabled the navigation pane and allow full menus. The login Menu automatically displays when the database is opened. After I created the .accde I was still able to right click in the top area (where the name of the form is) and close the form. Actually when I right clicked I got Save, Close All, Close, and Form View. Is there something else I need to turn off?
I have a split form that's like a list of pending tasks. The data source is a linked SharePoint 2013 list where users submit requests. The user takes the information from each record and performs an action. When it is done, the user presses a button and the task status changes from "Pending" to "Processed". The form record source is based on a query that finds only records with a status of "Pending" so when the user changes the status of the task, it is removed from the list. It works fine except when there is only one task left in the work list. If the user processes the last task, the form refreshes and it goes to a new empty record and I get an error message that says I must enter a value into one of the required fields. I tried making the field non-required but it just creates an empty record in the table.
In the main form I have a list box, when I right click on each item on list box another form "frmshortcut" (pop up) will be open in the position of mouse that shows a list box for selecting items according to below code, now I would like when select another place (except "frmshortcut"), this form automatically will be close, like what we have in shortcut list of windows. Now when right click it is opened in the location of mouse click, but problem is, it is not closed automatically when click in other places of main form.
Option Explicit Private Type POINTAPI x As Long y As Long End Type Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long Private mp As [*clsMousePosition]
I have a main form with several subforms based on a 1 to 1 relationship. The information on the main form is common to all the groups and is kept in one table. But each group has unique fields so each has its own table.
Each of the subforms is displayed on a page.
Question: I want the fields on the subform to be enabled. But I don't want the user to be able to select the pages by pusing their button. Is this possible? What is the setting?
I always seem to lock the entire form.....................
i have a form that there is a list box inside that. after selection of items (usually 20 items) and right click the mouse on items it should open another pop up form,the problem is after right click selected items will be unselected except one item that there is mouse on that. how can i prevent list box from deselecting items after right click .
the code for mouse right click is like below:
Private Sub ItemList_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single) Const RIGHTBUTTON = 2 Dim udtPos As POINTAPI Dim frm As Access.Form If Button = RIGHTBUTTON Then Set mp = New [*clsMousePosition] GetCursorPos udtPos DoCmd.OpenForm "frmshortcut" DoCmd.MoveSize udtPos.x * mp.TwipsPerPixelX, udtPos.y * mp.TwipsPerPixelY Forms!frmshortcut!txtparameter = Me.ItemList.Value End If End Sub
Getting error '2450' when click Access close button to exit.
Run-time error '2450': ECN cannot find the referenced form 'frmLogin'.
Note: After login my login form is visible to, cause to get login user id into "frmECN" Form. But When I'm in "frmECN" Form and enter data then close to exit Access main close button I'm getting 2450 error.
I need to prevent a form from opening if no data (no picture) is found in an image control on the form that needs to be opened. The form is opened in this manner:
DoCmd OpenForm StDocName,,,stLinkCriteria
Certain records will not have a picture so the form doesn't need to be opended.
I have searched through the whole posts but could not find my query. I have a question related to prevent duplicate data entry in a form field.
I have a Form with 5 fileds on it: SNO, NAME, ROLL NO, CLASS, SECTION.
in the table design i have set the option of NO DUPLICATES on SNO(Autonumber) ROLL NO (text).
I wish to stop a user entering duplicate data in ROLL NO field before he reaches at the last field. What i meant is as soon as a user enters data in ROLL No field, it should check in table if the same data is already there. If the same data is found then it should give a message to prompt user of duplicate data, else it should continue to next field.
I have searched the whole forum but in vain. I am positive that there must be some one who holds the key to this solution.
I am using the method from allen browne [URL] .... to open a form and add it to a collection and when removing it it closes. actually, usually it does work so but i have now a form which does not close until i am hitting the reset button in VBE , is there something i could check why it's not functioning as desired ?
Just to add, this form has a subForm as well (might be the cause ?)
I have a timer form which closes the database after a period of time with DoCmd.Quit. Another form is open at this point but if a user has left it in the middle of editing it I want to be able to save the record in the other form and close it before the timer form closes the database.
What VBA do I need in the timer form to save the record and close the other form before DoCmd.Quit? Just to be clear the code is...
Private Sub Form_Timer() On Error Resume Next Me.Tag = Val(Me.Tag) - (Me.TimerInterval / 1000) Me.Caption = "The database will exit in " & Me.Tag & " seconds" If Val(Me.Tag) <= 0 Then
I'm a newbie to the forum, but hope that someone can point me in the right direction to solve a problem.
Background: I have a db that I use much like Quicken to maintain a ledger and reconcile accounts. To reconcile credit card transactions, I have a continuous form that lists each transaction as a record in the Detail. Each record has Check Boxes for Yes/No criteria pertaining to "Cleared Status", "On Statement", and "Missing Receipt". Checking the box for "On Statement" allows a subsequent report to include the items that are checked. Likewise, an Update Query used later in the process sets all all items in the reconcile to "cleared" so that do not reappear on the list of items to reconcile. In order to cause the Report and the Update Query to reassess the Yes/No status for each item and thus function properly, I have set the Event Proceedure for these Check Boxes to Requery the underlying data.
Problem: As you can imagine, the list of Credit Card Transactions is a long one. Each time a Check Box is clicked, the requery causes the list of records to jump back to the very top of the list. This really slows down the process of completing the reconcile. Is there a way to hold the continuous list in the detail section still as the requery takes place?
Im trying to prevent duplicate records based on a PO # (RA_PO_Nbr), entered from a form. I'm trying to throw a 3022 error when the user attempts to enter a record that already exists, but I dont necessarily have to do it this way.
Code: Private Sub cmdSubmit_Click() On Error GoTo cmdSubmit_Click_Error Dim db As Database Dim rst As DAO.Recordset Dim strSQL As String strSQL = "CompanyPOTable"
I've been trying to use some code I've found to prevent a user from entering a duplicate ID. I've tried this:
Dim Answer As Variant Answer = DLookup("[SAR_ID]", "Request", "[SAR_ID] = '" & Me.SAR_ID & "'") If Not IsNull(Answer) Then MsgBox "Duplicate SAR ID Found" & vbCrLf & "Please enter again.", vbCritical + vbOKOnly + vbDefaultButton1, "Duplicate"
Cancel = True Me.SAR_ID.Undo Else: End If
but it displays the message even if I don't enter a duplicate.
When the user clicks to close the form the Before Update event runs, and has the following code to check that all the required fields are completed:
If IsNull(Me.ToxReceived) Then stdresponse = (MsgBox("You must enter the toxicology received date before continuing." & Chr(13) & Chr(10) & Chr(13) & Chr(10) & _ "Do you want to do that now? Click YES to return to complete the form, click NO to undo the record", vbYesNo, "Missing Data"))
If stdresponse = vbYes Then Me.ToxReceived.SetFocus
Else Cancel = True Me.Undo Exit Sub End If End If
If the user clicks no, and the record is undone, how do I get the close form event to still continue?
i put a button that run the command "docmd.close" but i found when i click it it close the form but with saving all data in field in the table, but this button should cancel record insertion, i hope i can find the answer here.
I have a form that I want only to be opened from another form (i.e. the user presses a button from form1 and form2 is magically displayed).
My solution: In form2, I check to see if form1 is open in "use" mode. If not, I display a message and close form2.
The problem: The close code (docmd.close) is at the beginning of Form_Current. Apparently, Form_Current doesn't like to be interrupted. I receive a run-time error 2585 (This action can't be carried out while processing a form or report event).
Ok, so, umm, how exactly am I supposed to close the form? I tried the check during Form_Load instead, using the cancel variable instead of the docmd.close. However, I don't think this code got executed. It's almost like the form was already loaded or the Form_Load occurs after Form_Current (In my handy chart here, it says that Form_Current occurs when a form containing data is first opened and when you move to a different record.. so, I suppose it is possible).
why a form won't close. Each time I try to I am prompted to save and when I do, the form doesn't close. When I closed the DB and reopened, none of the changes were saved.
I've created a form. Within that form I have an image control. I am using this code to pull the corresponding plant image from a folder filled with JPGs.
It works just fine except one thing. When I change from record to record my cursor jumps to the center of the pulled JPG. I don't want my cursor to move at all when loading these images. Is this possible? Thanks.
Private Sub Form_Current()
Dim FileExistsbol As Boolean Dim stFileName As String
I have 5 check boxes on a form and one of them must be checked in order to get the correct result. If the user does not check any of the the five checkboxes he gets a msgbox telling him that he must checks one of the checkboxes.
What i want to ask is if is possible to prevent the form from updating? Because the user gets the error message but after that the form is being updated even though he hasn't check any of the fields.
Nutshell: My user DB has one menu with 4 tabs (2 for adding records, and 2 for searching/editing records). Since the form opens up in the acFormAdd mode, Access already creates a new record (blank) before they type anything. It is resulting in blank false new records that are getting added to the table and they are getting annoying. My audit table is full of "user X created new record at this time" when it's just a blank record.
There must be a way to prevent this using VBA, but I cannot find it.
I've seen ways to disable "add new record" buttons and such, but nothing that disables Access from being smarter than me and creating a new record before I decide to.
Hi, I want to have some queries run during the database is closed, like the functiona with "Repair on Close". But I don't want to use a form with a VBA code doing it. Is there any other possibility to do it? :confused: Thanks in advance for answers.:)
I've got a database with a linked table to a CSV file which is automatically extracted from some logging software. The Database is used to search for text strings (e.g. "example") within several fields wichin the automated extract and then show the results with any duplicated instances taken out (via an append to table query which is indexed with no duplicates).
So:
Text is entered FieldA is looked through for a match, if a match is found the whole record gets appended to the Append table. FieldB is looked through and if a match is found the whole record (including field A) is appended, however if the match has already been found in A, then the record is not copied. It does this for several fields and then you get a table which is every record containing the searched for text with no duplicates. This table is then displayed as a subform on another form in it's "table" view.
The form I'm trying to close is the form which contains the above subform.
I've tried:
A macro with close -> form -> formname which doesn't work. Code: Private Sub Toggle2_Click() On Error GoTo Err_Toggle2_Click
HOWEVER, just to make things interesting, if I click to view the form design, then run the form again, it will close fine using either method. It just seems not to work on the initial run of the text search which then opens the form displaying the subform.
