Continuous form scrolls to top. Can I prevent this?

[zebrafoot]

Just curious, have you tried using a split form?

I have not and I'm not sure where I would start with that.

I wanted this to be a quick project, as it's only for tracking our "to do" list, rather than being a full customer database. I can't believe it isn't possible to do what I want it to do, I'm just not sufficiently well-versed in Access to do it.....but maybe i'm just wrong!

 

[theDBguy]

I have not and I'm not sure where I would start with that.

I wanted this to be a quick project, as it's only for tracking our "to do" list, rather than being a full customer database. I can't believe it isn't possible to do what I want it to do, I'm just not sufficiently well-versed in Access to do it.....but maybe i'm just wrong!

If you just want to give it a try, you can try the following steps:

1. From the Navigation Pane, select the table you want for your form
2. From the Create tab on the Ribbon, select More Forms > Split Form

 

[Ken Sheridan]

Take a look at the option to use a simulated split form in the attached little demo file. If you use this as a model for what you are doing you should have no problems.

 

[Gasman]

Ken, already suggested in post #12

 

[theDBguy]

Ken, already suggested in post #12

Sorry, missed it.

 

[MajP]

I would definitely look at the Emulated split form vs the real split form. More flexible and less problematic.

 

[isladogs]

If you do choose to look at the emulated split form, there is a newer version available on my website

Emulated Split Form

The emulated split form was created as a project to overcome the difficulties inherent with the built-in split form supplied with Access

isladogs.co.uk

For variations on the idea, see my companion article

Build Your Own Split form

The Access split form has several important limitations. This article shows how you can create your own simulated split form which doesn't have the restrictions inherent with the built-in Access split form

isladogs.co.uk

 

[Gasman]

Is this not solved then?, despite having a Solved marker?

 

[zebrafoot]

Thanks all. I did see the comments, earlier, regarding split/emulated split forms, but I haven't got around to trying those methods. I will take a look into it tomorrow.

@Gasman, no, not solved. I marked it as solved and tried to undo that, but not sure it worked.

 

[Gasman]

Thanks all. I did see the comments, earlier, regarding split/emulated split forms, but I haven't got around to trying those methods. I will take a look into it tomorrow.

@Gasman, no, not solved. I marked it as solved and tried to undo that, but not sure it worked.

Yes, it worked, no longer Solved.

 

[Ken Sheridan]

Dim intJobNumber As Integer
intJobNumber = Me.txtJobID

DoCmd.OpenForm "frmTodayNew", acNormal, , "JobID=" & intJobNumber

That filters the form to the one record. Rather than doing that, open the form and then navigate to the record:

    Const MESSAGE_TEXT = "No matching record found."
    Dim frm As Form
    Dim intJobNumber As Integer

    intJobNumber = Me.txtJobID
    DoCmd.OpenForm "frmTodayNew", acNormal
    Set frm = Forms("frmTodayNew")
    frm.FilterOn = False
   
    With frm.RecordsetClone
        .FindFirst "JobID = " & intJobNumber
        If Not .NoMatch Then
            frm.Bookmark = .Bookmark
        Else
            DoCmd.Close acForm, "frmTodayNew"
            MsgBox MESSAGE_TEXT, vbExclamation, "Warning"
        End If
    End With

 

[zebrafoot]

That filters the form to the one record. Rather than doing that, open the form and then navigate to the record:

    Const MESSAGE_TEXT = "No matching record found."
    Dim frm As Form
    Dim intJobNumber As Integer

    intJobNumber = Me.txtJobID
    DoCmd.OpenForm "frmTodayNew", acNormal
    Set frm = Forms("frmTodayNew")
    frm.FilterOn = False
 
    With frm.RecordsetClone
        .FindFirst "JobID = " & intJobNumber
        If Not .NoMatch Then
            frm.Bookmark = .Bookmark
        Else
            DoCmd.Close acForm, "frmTodayNew"
            MsgBox MESSAGE_TEXT, vbExclamation, "Warning"
        End If
    End With

Aha! This gives me a clue to the issue I am seeing. When I was adding a record, the parent form was showing filtered records. Removing that filter seems to help.