Access Form

  • Thread starter Thread starter slh
  • Start date Start date
S

slh

I have created a form when I open it, it has 1 of 1 in the record navigator.
I want to be able to see 1 of however many records I have so I can use the
find key to update a record if needed.
 
Is your form's properties set to Allow Addition? If so, I'll guess that the
"record" you see is blank!

Regards

Jeff Boyce
Microsoft Access MVP

--
Disclaimer: This author may have received products and services mentioned
in this post. Mention and/or description of a product or service herein
does not constitute endorsement thereof.

Any code or pseudocode included in this post is offered "as is", with no
guarantee as to suitability.

You can thank the FTC of the USA for making this disclaimer
possible/necessary.
 
I have created a form when I open it, it has 1 of 1 in the record navigator.
I want to be able to see 1 of however many records I have so I can use the
find key to update a record if needed.
Click to expand...

Correct the error in the form's design.

If you would like help doing so, please post some information about the form -
in particular, its Recordsource and Filter properties.
 
Jeff said:
Is your form's properties set to Allow Addition? If so, I'll guess that
the "record" you see is blank!
Click to expand...

Should i've been mistaken?

Up to now I thought that this only occurs when DataEntry is set to True

Volker
 
John I'm new at this, on my properties for the form I have Yes for everything
except Data Entry No
Record Locks No locks
Allow filters No
 
John I'm new at this, on my properties for the form I have Yes for everything
except Data Entry No
Record Locks No locks
Allow filters No
Click to expand...

Again:

What is the Recordsource of the form? (First line on the Data tab; if it's a
query or a SQL string please post the SQL).

What's the Filter?
 
I open the from from a switchboard that I created. I go to form RECCS it
opens blank 1 of 1 in the navigator, but i have 80 records in the table that
the form was created from. The table is names RECCS

Record Source: RECCS
 
I have a command button "Go to" when I hit it says "Cannot use Find or
Replace Now"
Click to expand...

In that case there is an error with its code... and it has nothing whatsoever
to do with Linq's suggestion.

If you would like help with your Go To button, please post its code.
 
where do I find the codes?
Click to expand...

Open the form in design view. View its Properties. View the properties of the
command button; on the "Events" tab see what's in the Click event. If it says
[Event Procedure] click the ... icon by it to open the VBA editor, and copy
and paste the text there to a message here.
Is there anyway we can talk on the phone?
Click to expand...

If you're willing to discuss a paid consulting arrangement; sorry, but not for
free.
 
Option Compare Database

Private Sub close_Click()
On Error GoTo Err_close_Click


DoCmd.close

Exit_close_Click:
Exit Sub

Err_close_Click:
MsgBox Err.Description
Resume Exit_close_Click

End Sub
Private Sub Save_Click()
On Error GoTo Err_Save_Click


DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

Exit_Save_Click:
Exit Sub

Err_Save_Click:
MsgBox Err.Description
Resume Exit_Save_Click

End Sub
Private Sub Search_Click()
On Error GoTo Err_Search_Click


Screen.PreviousControl.SetFocus
DoCmd.FindNext

Exit_Search_Click:
Exit Sub

Err_Search_Click:
MsgBox Err.Description
Resume Exit_Search_Click

End Sub
Private Sub Find_Record_Click()
On Error GoTo Err_Find_Record_Click


Screen.PreviousControl.SetFocus
DoCmd.FindNext

Exit_Find_Record_Click:
Exit Sub

Err_Find_Record_Click:
MsgBox Err.Description
Resume Exit_Find_Record_Click

End Sub
Private Sub Find_Record_Now_Click()
On Error GoTo Err_Find_Record_Now_Click


Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70

Exit_Find_Record_Now_Click:
Exit Sub

Err_Find_Record_Now_Click:
MsgBox Err.Description
Resume Exit_Find_Record_Now_Click

End Sub
Private Sub Add_a_New_Record_Click()
On Error GoTo Err_Add_a_New_Record_Click


DoCmd.GoToRecord , , acNewRec

Exit_Add_a_New_Record_Click:
Exit Sub

Err_Add_a_New_Record_Click:
MsgBox Err.Description
Resume Exit_Add_a_New_Record_Click

End Sub
Private Sub Find_a_Record_Click()
On Error GoTo Err_Find_a_Record_Click


Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70

Exit_Find_a_Record_Click:
Exit Sub

Err_Find_a_Record_Click:
MsgBox Err.Description
Resume Exit_Find_a_Record_Click

End Sub
Private Sub Find__Record_Click()
On Error GoTo Err_Find__Record_Click


Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70

Exit_Find__Record_Click:
Exit Sub

Err_Find__Record_Click:
MsgBox Err.Description
Resume Exit_Find__Record_Click

End Sub


John W. Vinson said:
where do I find the codes?
Click to expand...

Open the form in design view. View its Properties. View the properties of the
command button; on the "Events" tab see what's in the Click event. If it says
[Event Procedure] click the ... icon by it to open the VBA editor, and copy
and paste the text there to a message here.
Is there anyway we can talk on the phone?
Click to expand...

If you're willing to discuss a paid consulting arrangement; sorry, but not for
free.
Click to expand...
 
Back
Top