Hi All,
Question...How do I disable a field after the Find command? Below is the code for the find command through wizard. I guess I need to enabled=false somewhere but I don't know where to place it.
Thanks!
Private Sub CmdFindRecord_Click()
On Error GoTo Err_CmdFindRecord_Click
Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70
Exit_CmdFindRecord_Click:
Exit Sub
Err_CmdFindRecord_Click:
MsgBox Err.Description
Resume Exit_CmdFindRecord_Click
I would guess after this line is where you would place that:
Code:DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70
jmurrayhead
If you agree, give me rep. If my post helped you, click "Thanks".
If you like it here...throw us a few bones to help support us.
I have tried that and it only allowed me to search once in that field...not more than once. How could I ask it to disable the field after I have close the find box?
Perhaps you could clarify better what it is you're trying to do. From what I gather, you display a form that is used for searching. Once a user searches, you disable the field.
How many times should they be allowed to search? Why are they limited to that many searches?
jmurrayhead
If you agree, give me rep. If my post helped you, click "Thanks".
If you like it here...throw us a few bones to help support us.
I'm sorry.
I have a form that allow users to add a new record or edit an existing record. If a user comes in and adds a new record, they would click a button and certain fields will be enabled (All the fields are disabled in the form). And if the user is editing, they will click on the editing button and other fields will be enabled. After adding or updating, the records will be saved.
I want to make it easier for the user to search for a record when updating. I would first have to enable the field "meeting" and then the search will work. But after searching, I want to disable the field again so they wouldn't change the meeting name by accident. I have put "me!txtmeeting.enabled=false" where you have suggested, but that only allowed me to search the field meeting once. If I click on 'Find Next' it doesn't work because the field is diabled.
If I can, I would want the maximum to be 10 times and after that a message box to say something about refining your search.
I hope I'm making sense.
as a sugestion, you could create a combo box. Using the wizard select 'find a record on my form based on the value selected in my combo box' then select the field you wish to search.
Your code will look something like,
As a search combo is unbound, you will not risk editing the record.Code:' Find the record that matches the control. Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[FieldName] = " & Str(Nz(Me![ComboBox], 0)) If Not rs.EOF Then Me.Bookmark = rs.Bookmark
If i helped you, make me famous by clicking the
I'm assuming you have one button that you are doing the searching and find/next with.
Put this at the top of your code:
Code:If me.txtmeeting.enabled = false then me.txtmeeting.enabled = true Else me.txtmeeting.enabled = false ' 'your search function goes here ' End If
Is there a code to say "after you click cancel on the find/replace, to enabled=false on meeting field"?
Did you try using a search combo,? it won't matter if the others field are enabled or not,. Seems to make perfect sense to me unless i'm completely missing the point
If i helped you, make me famous by clicking the
I have tried using a combo box and it is unbound. But for some reason, the meetings doesn't match my data...unless I'm doing something wrong. The more I play with it, the more I get. LOL.
Posting Permissions 
LinkBack URL
About LinkBacks
Bookmarks