MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


  • Novo Tópico
  • Responder ao tópico

[Resolvido]Abrir um Formulario de Cadastro Clientes ja no Registro especifico

avatar
fazerbem
Avançado
Avançado

Respeito às Regras 100%

Sexo : Masculino
Localização : Brasil
Mensagens : 375
Registrado : 05/03/2017

[Resolvido]Abrir um Formulario de Cadastro Clientes ja no Registro especifico Empty [Resolvido]Abrir um Formulario de Cadastro Clientes ja no Registro especifico

Mensagem  fazerbem em 5/6/2018, 23:40

Oi, como faco estando eu num Form "X" , tendo este um botao de comando , abrir um outro Form de "cadastro de clientes" tendo como base o Id do cliente que esta numa caixa de texto no Form "X" ? Ou Seja ao Abrir o Form CadastroCli, ao inves de abrir no primeiro registro ja abra no registro determinado em Form"X".

Grato

Andre
Silvio
Silvio
Developer
Developer

Respeito às Regras 100%

Sexo : Masculino
Localização : Brasil
Mensagens : 4358
Registrado : 20/04/2011

[Resolvido]Abrir um Formulario de Cadastro Clientes ja no Registro especifico Empty Re: [Resolvido]Abrir um Formulario de Cadastro Clientes ja no Registro especifico

Mensagem  Silvio em 5/6/2018, 23:53

Algo parecido com isso abaixo:


Private Sub CaixadetextoChavePrimária_DblClick(Cancel As Integer)
If MsgBox("Deseja abrir esse cadastro de clientes ?", vbYesNo + vbQuestion, Me.Caption) = vbNo Then
Exit Sub
Else
Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "Nome do formulário a ser aberto"

stLinkCriteria = "]Chave primaria]=" & Me!]chave primaria]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Docmd.Close
End If

End Sub

Substitua os campos em vermelho pelo teus campos.


.................................................................................
Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
www.maximoaccess.com/t860-resolucao-de-topicos

"Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
avatar
fazerbem
Avançado
Avançado

Respeito às Regras 100%

Sexo : Masculino
Localização : Brasil
Mensagens : 375
Registrado : 05/03/2017

[Resolvido]Abrir um Formulario de Cadastro Clientes ja no Registro especifico Empty Re: [Resolvido]Abrir um Formulario de Cadastro Clientes ja no Registro especifico

Mensagem  fazerbem em 6/6/2018, 03:33

Obrigado mais esta vez, deu tudo certo, so tieri o Close que fechava o Form, e as pergunta.

Grato andre

Código:


Option Compare Database

Private Sub Comando2_Click()

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "FrmCad_Produto"

stLinkCriteria = "[idProduto]=" & Me![texto]
DoCmd.OpenForm stDocName, , , stLinkCriteria


End Sub

Private Sub Form_Load()
Me.texto = 10
End Sub


Silvio
Silvio
Developer
Developer

Respeito às Regras 100%

Sexo : Masculino
Localização : Brasil
Mensagens : 4358
Registrado : 20/04/2011

[Resolvido]Abrir um Formulario de Cadastro Clientes ja no Registro especifico Empty Re: [Resolvido]Abrir um Formulario de Cadastro Clientes ja no Registro especifico

Mensagem  Silvio em 6/6/2018, 12:33

Bom dia..
O fórum agradece o retorno !
Bom trabalho.


.................................................................................
Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
www.maximoaccess.com/t860-resolucao-de-topicos

"Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
avatar
Ismael Silva
Avançado
Avançado

Respeito às Regras 100%

Sexo : Masculino
Localização : Brasil
Mensagens : 410
Registrado : 11/12/2017

[Resolvido]Abrir um Formulario de Cadastro Clientes ja no Registro especifico Empty Re: [Resolvido]Abrir um Formulario de Cadastro Clientes ja no Registro especifico

Mensagem  Ismael Silva em 6/6/2018, 15:59

Vai me ajudar tbm.

Conteúdo patrocinado

[Resolvido]Abrir um Formulario de Cadastro Clientes ja no Registro especifico Empty Re: [Resolvido]Abrir um Formulario de Cadastro Clientes ja no Registro especifico

Mensagem  Conteúdo patrocinado

  • Novo Tópico
  • Responder ao tópico

Data/hora atual: 25/5/2019, 06:43