[Resolvido]Selecionar cliente e tipo de documento no mesmo frm e imprimir

Tenho o frmCliente (* anexei * ) e nele digito data, selecione o nome do cliente.
E neste frm criei vários botões para botões- um para cada tipo de documento.
Eu queria fazer assim : digitar data, selecionar nome do cliente, selecionar tipo de documento e então seria mostrado o documento

Exemplo:

Desejo - Darei um Exemplo
DATA- 15/02/2021
NOME DO CLIENTE -  João Rodrigues  ( seleciono )
DOCUMENTO - Adicional Contrato ( seleciono )

(Imprimo   - visualizo )
_____________________________________________________

Hoje como faço -Exemplo

DATA- 15/02/2021
NOME DO CLIENTE -  João Rodrigues  ( seleciono )
DOCUMENTO -  ( NÃO CONSEGUI )

Exemplo - Então seleciono  abaixo da caixa de texto [ Contrato ] o item Adicional

(Imprimo - visualizo )

Rosemberg


A gente precisa ver teu projeto.

Você usa caixa de combinação (combobox), embora esteja selecionado,
está usando a coluna certa?

Bom, foi só um exemplo.

Só analisando, o resto é conjecturas.

Faça uma cópia das tabelas e os objetos afins com 2 ou 3 registros para
a gente analisar.

{ }'s

Balem

Tentei isso... quase deu certo

Ta ai o arquivo.

Veja se é só isso.

Não consegui colocar no forum, coloquei no mega.

Copie e cole no navegador.

mega.nz/file/oE5Q1I4A#BrcmR0N2d2Actf4UolZl9XboSZWdG2rXy37U2vZg834

{ }'s

Balem

Não deu certo

Estou desejando que : no frmDocumento ou no frmDocumentos1 , eu faça o seguinte >

Exemplo :

1) digite uma data-------------------------------- 12/12/2000
2) selecione  Nome do Cliente--------------------Alex
3) selecione o Documento ----------------------- Adicional Contrato


Obrigado por sua ajuda

Rosemberg

O que ocorre é que os campos de data estão como texto (String), por isso os erros.

Veja, as linhas em azul eu arrumei e estão corretas.

As em vermelho(ocre) estão erradas.

Você deve arrumar todas elas

Abra o formulário frmDOCUMENTOS em modo design.

No menu de opção la em cima, faixa ribbon, no canto direito clique em exibir código e divirta-se.

Isso terá que fazer também no frmDOCUMENTOS1 ok?



Private Sub Comando46_Click()
Dim vDataProc       As String
Dim vcliente          As String

   
   vgDataProc = Format(txtDataProc.Value, "dd/mm/yyyy")
   vcliente = cboCliente.Column(0)
   DoCmd.Close acForm, Me.Name, acSaveYes
   DoCmd.OpenReport "rptHIPOSSUFICIENCIA", acViewPreview, , "CodCliente = " & vcliente & ""
End Sub

Private Sub Combinação9_Click()
Dim vDataProc       As Date
Dim vcliente        As String
   
      
   vgDataProc = Format(txtDataProc, "dd/mm/yyyy")
   vcliente = cboCliente.Column(0)
   DoCmd.Close acForm, Me.Name, acSaveYes
   DoCmd.OpenReport "rptFORMACAOContrato", acViewPreview, , "CodCliente = " & vcliente & ""

End Sub

Não coloquei em caixa de código para facilitar a leitura.

Depois de resolvido, eu coloco.