Esqueceu sua senha? Você pode usar o mecanismo de lembrete neste link: Recuperar senha

Você receberá um link de reativação no email cadastrado.

Não recebeu o email? Lembre-se checar o Lixo Eletrônico.

Cadastro de processos

Discussões sobre a integração do Excel com o Banco de Dados Access

Moderador: joseA

eristonmattos
Acabou de chegar
Acabou de chegar
Mensagens: 9
Registrado em: Dom Ago 26, 2018 7:31 pm

Cadastro de processos

Mensagem por eristonmattos » Qui Set 13, 2018 4:07 pm

Alguma solução para um BD onde a dúvida é:
um formulário de consulta que, quando eu digitar um número (no caso, nº de CNS),
os outros campos (nome, cpf, dt nasc, etc) preencham automaticamente....
Alguma solução simples? Usando "SetFocus" em "Ao atualizar"

Att,



Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
milton
Manda bem
Manda bem
Mensagens: 108
Registrado em: Sex Jun 17, 2016 8:22 am

Re: Cadastro de processos

Mensagem por milton » Qui Set 13, 2018 10:21 pm

Olá eristonmattos

Segue anexo, veja se é a sua necessidade e adapte ao seu projeto.
Anexos
pesquisa.rar
(17.14 KiB) Baixado 20 vezes



eristonmattos
Acabou de chegar
Acabou de chegar
Mensagens: 9
Registrado em: Dom Ago 26, 2018 7:31 pm

Re: Cadastro de processos

Mensagem por eristonmattos » Ter Set 18, 2018 10:52 am

Bom dia Milton,
Vc me enviou um arquivo .xlsm, de Excel, estou usando um BD em Access 2016 enfim...
preciso de outra solução para este caso nobre...

É possível?

Att,



sandrojrs
Colaborador
Colaborador
Mensagens: 38
Registrado em: Seg Fev 19, 2018 5:32 pm

Re: Cadastro de processos

Mensagem por sandrojrs » Qui Out 11, 2018 3:45 pm

olá amigo chegou ajuda haha vou te passar o código.
Usei um combobox que ao selecionar um dado do acess ele passa o restante dos valores para os textbox



Private Sub ComboBox1_Change()

Dim cx As New ClasseConexao
Dim banco As ADODB.Recordset
Dim sql As String

cx.Conectar
sql = "SELECT* FROM costureira WHERE CLIENTE = '" & ComboBox1.Text & "'"

Set banco = New ADODB.Recordset
banco.Open sql, cx.Conn
On Error Resume Next

idid.Value = banco.Fields("Código")
TextBox2.Text = banco.Fields("DESCRIÇÃO")
TextBox3.Text = banco.Fields("QUANTIDADE")
TextBox4.Text = banco.Fields("MALHA")
TextBox5.Text = banco.Fields("COR")
TextBox6.Text = banco.Fields("ENTREGA")
textbox7.Text = banco.Fields("STATUS")


Set banco = Nothing

cx.Desconectar

End Sub



Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


sandrojrs
Colaborador
Colaborador
Mensagens: 38
Registrado em: Seg Fev 19, 2018 5:32 pm

Re: Cadastro de processos

Mensagem por sandrojrs » Qui Out 11, 2018 3:47 pm

se precisar de ajuda me chama ai



Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder