esta aparecendo "Erro em tempo de execução... operador faltando na expressão da consulta"
Private Sub NomePaciente_DblClick(Cancel As Integer)
DoCmd.OpenForm "frmCadProcMarcapassoAvaliacao", , , "nomepaciente = " & Me.NomePaciente
End Sub
onde esta o erro ?