Ajuda na combo box

clebermoura 31/10/2013, 16:32

clebermoura: Novato; Respeito às regras :

Sexo :
Localização :
Mensagens : 46
Registrado : 31/10/2013

Mensagem nº1

Ajuda na combo box

Mensagem clebermoura 31/10/2013, 16:32

Criei uma combo box com nome Codigo_Endereço que contem 3 colunas:
1-Codigo_Endereço, 2-Endereço, 3-Complemento
Coloquei o seguinte código:

Private Sub Codigo_Endereço_AfterUpdate()
With Codigo_Endereço
Me.Endereço = .Column(1)
Me.Complemento = .Column(2)
Me.Refresh
End With
End Sub

O Primeiro campo atualiza numa boa, mas o segundo não.
Gostaria de uma ajuda para resolver esse problema.

**Alexandre Neves** 31/10/2013, 17:17

Alexandre Neves

Alexandre Neves: Moderador Global; Respeito às regras :

Sexo :
Localização :
Mensagens : 8449
Registrado : 05/11/2009

Mensagem nº2

Re: Ajuda na combo box

Mensagem Alexandre Neves 31/10/2013, 17:17

Boa tarde, clebermoura, e bem-vindo ao fórum
Não se justifica colocar votação. Deve-a excluir
Sobre a sua dúvida, provavelmente, não terá dados nessa coluna. Reveja a origem dos dados

.................................................................................
Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

clebermoura 31/10/2013, 17:24

clebermoura

clebermoura: Novato; Respeito às regras :

Sexo :
Localização :
Mensagens : 46
Registrado : 31/10/2013

Mensagem nº3

Re: Ajuda na combo box

Mensagem clebermoura 31/10/2013, 17:24

Nesse campo tem texto sim.
eu criei uma nova combo box e coloquei para atualizar apenas o campo que não atualiza na primeira e funcionou mas eu queria que funcionasse junto.

**Alexandre Neves** 31/10/2013, 17:26

Alexandre Neves

Alexandre Neves: Moderador Global; Respeito às regras :

Sexo :
Localização :
Mensagens : 8449
Registrado : 05/11/2009

Mensagem nº4

Re: Ajuda na combo box

Mensagem Alexandre Neves 31/10/2013, 17:26

Há-de haver alguma diferença.
Se puder disponibilizar

.................................................................................
Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

clebermoura 31/10/2013, 17:36

clebermoura

clebermoura: Novato; Respeito às regras :

Sexo :
Localização :
Mensagens : 46
Registrado : 31/10/2013

Mensagem nº5

Re: Ajuda na combo box

Mensagem clebermoura 31/10/2013, 17:36

vou preparar uma copia aqui e enviar.
mas quando eu coloco o codigo =[Codigo_Endereço].[Column](2)
no campo Complemento aparece numa boa.

**Alexandre Neves** 31/10/2013, 18:09

Alexandre Neves

Alexandre Neves: Moderador Global; Respeito às regras :

Sexo :
Localização :
Mensagens : 8449
Registrado : 05/11/2009

Mensagem nº6

Re: Ajuda na combo box

Mensagem Alexandre Neves 31/10/2013, 18:09

Retire o Me
Private Sub Codigo_Endereço_AfterUpdate()
With Codigo_Endereço
.Endereço = .Column(1)
.Complemento = .Column(2)
.Refresh
End With
End Sub

.................................................................................
Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo