[Resolvido]Abrir formulário com filtro.

Bom dia,
sou iniciante e preciso de uma ajuda.

Tenho um formulário chamado "Login" e um chamado "AcessoPaciente".

No botão "Acessar" do formulário Login, tem o seguinte código:

Private Sub Comando6_Click()
Dim db As Database
Dim registo As Recordset
Dim Index As String
Dim PrimaryKey As Integer

Set db = CurrentDb()
Set registo = db.OpenRecordset("Paciente", dbOpenTable)
registo.Index = "PrimaryKey"
registo.Seek "=", txtCpf

If registo.NoMatch Then
MsgBox "Nome não registado", vbOKOnly, "Validação"
DoCmd.GoToControl "txtCpf"
ElseIf Not (registo![senha] = (txtSenhap)) Then
MsgBox "Senha inválida, tente novamente!", vbOKOnly, "Validação"
DoCmd.GoToControl "txtSenhap"
txtSenhap.SetFocus
txtSenhap.SelStart = 0
txtSenhap.SelLength = Len(txtSenhap)
Else
'MsgBox "Nome e senha confirmados", vbOKOnly, "Confirmação"
DoCmd.OpenForm "AcessoPaciente"
Me.Visible = False
End If

Exit Sub

O que eu queria é que, ao abrir o formulário "AcessoPaciente", abrisse apenas as informações do usuário que efetuou login.
O campo que seria referente ao Username do Formulário Login, chama-se txtCpf, e do AcessoPaciente, chama-se Cpf.

Obrigada.

seja bem vinda ao forum

filtre o form que vai abrir

DoCmd.OpenForm "AcessoPaciente", , , Me.txtCpf

Conseguiu resolver?

Bom vamos dar como resolvido, qualquer coisa estamos aí.