[Resolvido]Gravar campo do formulario em outro campo no mesmo formulario - coluna 2

Bom dia

Estou em problema para resolver .. tem como de ajudar, conforme abaixo:

campo tec_doc
SELECT [tbl_Pedido].[Doc_Tec], [tbl_Pedido].[Cod_Empresa] FROM tbl_Pedido ORDER BY [Doc_Tec];

Esta gravando o campo [Doc_Tec] correto..


No campo seguinte Cod_empresa .. gostaria que gravasse o campo cod_empresa do registro do select acima..

Como posso resolver..

Segue Projeto - anexo

Cade o anexo.

meio anexo tem 73kb

não esta aindo

Carlos boa tarde,

Mude o SELECT do combobox Cod_Empresa, conforme abaixo:




OBS: Conforme eu vi na tabela, o 2 registro estão como Cod_Empresa equivalente ao Cod_Fornecedor da tabela tbl_Pedido. Acredito que seja isto.

Boa sorte

[]'s


FIM

Tem como fazer conforme abaixo:

COMBO TEC_DOC

COLULA 1 COLUNA 2
LM-17.02.07.00.6Z1-1201-1 BRA011110122

No campo TEC_DOC esta gravando o valor LM-17.02.07.00.6Z1-1201-1 esta correto..

O que gostaria é que a COLUNA 2 gravasse no campo Cod_empresa o valor BRA011110122 da coluna 2 do combo TEC_DOC,

Como poderia fazer

Fico no aguardo

Obrigado

Carlos,

Na vdd, não seria a coluna 2, e sim a coluna 1 do combo Tec_Doc, pois a contagem de colunas começa do ZERO (0). Esta regra se aplica também a ListBox (Caixa de Listagem).

Fiz alguns ajustes no form de Movimento. Mudei o tipo de campo Cod_Empresa para caixa de texto. Ficou assim:



O código no combo Tec_Doc, no evento "Após Atualizar" (AfterUpdate) ficou assim:

Código:



Private Sub doc_Tec_AfterUpdate()

    Me.Cod_Empresa.Value = Me.doc_Tec.Column(1)

End Sub



É isso!!
Espero ter ajudado.

Segue versão atualizada.

Boa sorte.

[]'s

FIM

É isso que precisa ...

Obrigado pela força

Valeu Carlos...o fórum agradece !!!

Sucesso !!!