Bom, criei um formulário a partir de uma consulta filtrada, mas essa consulta pode me dar mais de 1 registro então coloquei um botão next para navegar, só que não queria que esse botão fosse para um relatório em branco "novo" quando acabasse o registro, ele tem que simplesmente ir para o ultimo e de lá só poder voltar para o anterior no outro botão.. o que eu posso fazer?
4 participantes
Botão Proximo
lucaaslb- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 3
Registrado : 28/10/2015
- Mensagem nº1
Botão Proximo
Nogaro513- Avançado
- Respeito às regras :
Sexo :
Localização :
Mensagens : 482
Registrado : 12/08/2013
- Mensagem nº2
Re: Botão Proximo
boa noite amigo Lucas tem como postar o BD ou Parte dele para verificar abraço Nogaro !
Ixion- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 8
Registrado : 24/10/2015
- Mensagem nº3
Re: Botão Proximo
Boa noite, é só ir nas propriedades do formulário e na opção "Permitir adições" deixe marcado "não".
Eu também estava com esse problema e resolvi assim.
Eu também estava com esse problema e resolvi assim.
Nogaro513- Avançado
- Respeito às regras :
Sexo :
Localização :
Mensagens : 482
Registrado : 12/08/2013
- Mensagem nº4
Re: Botão Proximo
bom dia amigo Lucas e amigo Vieira
o Vieira tem Razão nas propriedades do Formulário, na aba dados coloque não permitir adições. no ultimo registro, quando clicar para o próximo não vai abrir o Formulário em branco,
ai aparece a mensagem " Você não pode ir para o registro especificado " abraço Nogaro !
o Vieira tem Razão nas propriedades do Formulário, na aba dados coloque não permitir adições. no ultimo registro, quando clicar para o próximo não vai abrir o Formulário em branco,
ai aparece a mensagem " Você não pode ir para o registro especificado " abraço Nogaro !
Buscador- Avançado
- Respeito às regras :
Sexo :
Localização :
Mensagens : 260
Registrado : 26/02/2011
- Mensagem nº5
Re: Botão Proximo
Talvez isto: (tente)
Private Sub BtnProximo_Click()
On Error GoTo TRATAERRO
DoCmd.GoToRecord , , acNext
Exit Sub
If Me.CurrentRecord = LastRecord Then GoTo TRATAERRO
Exit Sub
TRATAERRO:
MsgBox "Não existem mais registros cadastrados !", vbInformation, "Reciclagem"
Exit Sub
End Sub
Private Sub BtnProximo_Click()
On Error GoTo TRATAERRO
DoCmd.GoToRecord , , acNext
Exit Sub
If Me.CurrentRecord = LastRecord Then GoTo TRATAERRO
Exit Sub
TRATAERRO:
MsgBox "Não existem mais registros cadastrados !", vbInformation, "Reciclagem"
Exit Sub
End Sub
lucaaslb- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 3
Registrado : 28/10/2015
- Mensagem nº6
Re: Botão Proximo
mudei em propriedades e não permiti edições
muito obrigado, foi tão simples e eficiente...
muito obrigado, foi tão simples e eficiente...
Nogaro513- Avançado
- Respeito às regras :
Sexo :
Localização :
Mensagens : 482
Registrado : 12/08/2013
- Mensagem nº7
Re: Botão Proximo
boa tarde Luca obrigado, O Fórum agradece o retorno, só faltou marcar como resolvido , abraço Nogaro !