[Resolvido]Formulario de cadastro de veiculos

Boa noite,
Eu trabalho com Despachante atendendo as minhas necessidades estou fazendo um banco de dados para cadastro de clientes e veículos, eu fiz um tabela chamada "tabcliente" contendo os dados: Nome, CPF ou CNPJ, etc... e outra chamada "tabveiculos" com placa, renavan, chassi etc... fiz também dois formulários um para cadastro de cliente "frmcliente" e outro para cadastro de veículos "frmveiculo". O que eu quero e o seguinte preciso que ao cadastrar o cliente no formulário de cliente ao clicar no botão para salvar o ele me perguntar se quero cadastrar veiculo para este cliente sim ou não, se eu clicar em "sim" abrir o formulário vinculado de cadastro de veiculo ou se eu clicar em "não" salvar os dados e fechar meu formulário de clientes. OBS... quero que este vinculo entre os formulários seja feito através do CPF ou CNPJ do cliente

Boa noite,

Teste:


Private Sub SeuBotao_Click()
If MsgBox("Deseja cadastrar o veiculo para este cliente", vbYesNo + vbQuestion, "Aviso") = vbYes Then
DoCmd.OpenForm "NomeFormulario"
Else
Docmd.save
Msgbox "Registro salvo com sucesso", "Aviso"
End If
End Sub

Muito obrigado Danilo, deu certo, muito obrigado.
Preciso de só mais uma ajuda. Quando abrir o formulário de cadastro de veiculo ele fique vinculado com o formulário de cliente. E que o vinculo seja feito com o campo CPF ou CNPJ.

Se eu entendi bem voce quer usar um relacionamento entre tabelas, certo?

Na tabela Clientes voce tem um campo CPF, para relacionar com a tabela Veiculos voce tem que referenciar o CPF na tabela veiculos exempo:


TabelaCliente : CPF
TabelaVeiculos: CPF

A relacaçao é de um para muitos, ou seja: Um cliente com CPF pode ter muitos veiculos em seu nome/CPF

isso mesmo Danilo, como posso fazer isso?

Estude este artigo, vai te ensinar como fazer...

http://maximoaccess.forumeiros.com/t1101-relacionamento-de-tabelas?highlight=Relacionamento

Nesta sala não se pode postar duvidas, tópico movido para a sala correta.

Desculpe JPaulo não me atentei ao topico. Obrigado

Tranquilo.

Bom Dia,

Desculpa Jpaulo tambem não atentei que estava postando na sala errada

Edison, utilize o OpenArgs para passar automaticamente o CPF para o segundo formulario.

Veja o simples;

No form Clientes:

Private Sub Command3_Click()
    If MsgBox("Deseja cadastrar o veiculo para este cliente", vbYesNo + vbQuestion, "Aviso") = vbYes Then
    DoCmd.OpenForm "frmVeiculos", , , , , , Me.CPF
    Else
    DoCmd.Save
    Exit Sub
    End If
End Sub

No form Veiculos;

Private Sub Form_Load()
    If Not IsNull(Me.OpenArgs) Then
        Me.CPF.Value = Me.OpenArgs
    End If
End Sub

Muito Obrigado, JPaulo
É isso mesmo que estou precisando vou tentar no meu te respondo

Valew.