[Resolvido]Escolher por caixa de combinação e preencher campos anexos do formulário

05.09.2013
Bom dia. Sou o Jorge e estou no inicio com o access. O forum tem sido a fonte para as minhas pesquisas.
Como posso fazer num formulário:
Com uma caixa de combinação chamar um registo e preencher campos anexos do formulário
Ex: Num documento de recolha de lançamentos tenho detalhes.
Nos detalhes gostaria de chamar através de caixa de combinação o artigo e preencher os campos do nome, preço, taxa iva.

Desde já agradeço a disponibilidade

Jorge

Bom dia Jorge......

Seja bem vindo ao fórum !!

De uma olhada nesse exemplo. Estude ele, os códigos estão abertos para a aprendizagem.

Abraços,

05.09.2013
Bom dia de novo
Sílvio Grato pelo exemplo, estou a estudar e já retirei algumas ideias, só por isto já teve a sua utilidade.
Para a minha questão ainda não consegui implementar.
Vou aplicar-me e depois logo dou noticias.
Mais uma vez agradecido

Jorge

Qualquer duvida, estamos por aqui.

Bom de novo
Sílvio, a opção apresentada no exemplo não será bem o que pretendo, mas todo o exemplo é-me útil para a construção da minha aplicação. Muito Obrigado
Tenho o formulário que vem da tabela Cabeçalhos.
Quero introduzir um subformulário com a Consulta da tabela Detalhes.
Os campos da Consulta Detalhes incluem CodArtigo; NomeArtigo; PreçoArtigo TaxaArtigo.
Sql da Consulta Detalhes:
SELECT DETALHES.*,
[Valor Unit]*[Qtd] AS VIliqEspand,
[VIliqEspand]-[Valor Iliq Já Pago] AS VIApuradoEspand,
[VIApuradoEspand]*[Taxa Iva]/100 AS VIvaEspand,
[VIvaEspand]+[VIApuradoEspand] AS VLiqEspand,
([Taxa Iva]/100)+1 AS FactorIva, Round([PvpCIva]/[FactorIva],6) AS PvpSIva,
[Artigo 000 Artigo].*
FROM DETALHES INNER JOIN [Artigo 000 Artigo] ON DETALHES.[Art Codigo] = [Artigo 000 Artigo].[Art Codigo];

Como posso fazer para chamar o artigo com a caixa de combinação e preencher os restantes campos inerentes à tabela Artigo e preencher os campos da Consulta Detalhes.

Muito Obrigado

Jorge Ferreira

Boa tarde a si !

Gentileza, poste parte do teu projeto, onde esta a duvida, para analisarmos.

Bom fim de semana.

09.09.2013
Bom dia
Sílvio
Ora então vamos lá ver se consigo explicar o que pretendo.
Pra mim é simples, mas...
Prepósito do projeto: fazer lançamentos de documentos [tipo fatura; nota de crédito]

Tabelas
Cabecalho:IdCabecalho; DocCodigo; DocNome; DocNumero; DocData; etc…
Artigo: IdArtigo; ArtigoCodigo; ArtigoDescricao; ArtigoPreco; ArtigoTaxa
Detalhes: IdDetalhes; IdCabeçalho; DocNumero; DocData; ArtigoCodigo; ArtigoDescricao; Qtd; ValorUnit; ValorIliqJáPago

Consulta
Detalhes Consulta:
SELECT Detalhes*,
ValorUnit*Qtd AS VIliqEspand,
VIliqEspand-ValorIliqJáPago AS VIApuradoEspand,
VIApuradoEspand*Taxa/100 AS VIvaEspand,
VIvaEspand+VIApuradoEspand]AS VLiqEspand,
Artigo*
FROM Detalhes INNER JOIN Artigo ON Detalhes.ArtigoCodigo = Artigo.ArtigoCodigo;

Formulário
Cabecalho com um subformulário Detalhes da Consulta
Ao introduzir dados gostava de escolher o ArtigoCodigo a partir de uma Caixa de Combinação da tabela Artigo com origem do controlo Detalhes.ArtigoCodigo e preenchimento dos restantes campos relativos ao artigo na consulta Detalhes Consulta.

Obrigado pela sua disponibilidade.
Jorge

Jorge, bom dia.


Zipa teu banco, com as partes onde estão a duvida, e poste ele aqui.


Grato.

Bom dia Sílvio

conforme solicitou envio em formato zip o meu projecto.
A intenção é nos lançamentos no formulário CABEÇALHO.
Ao escolher o artigo a linha é preenchida com os campos referente ao artigo e fica gravado na consulta detalhes.
Sílvio, tenho andado a xaratar exemplos aqui no Forum e os seu como estão abertos são óptimos para se tirar ideias e formas de executar.
No final do projecto estar pronto posso dar-lho para rever e postar aqui no Forum.

Será que o titulo do tópico é o mais aconselhado???? (Escolher por caixa de combinação e preencher campos anexos do formulário)
Aceito sugestões.

Nova Foto e com chapéu!

Mais uma vez
Os meus agradecimentos pela disponibilidade

Jorge

Jorge, boa tarde a ti.

Está meio confuso teu projecto. Relacionamentos entre tabelas esquisito. Esto tentando entender aqui, o teu subformulário, que vem da tbartigos.

Bom façamos assim....

No teu subformulário, campo "Artcodigo", que é uma combobox, vá até em propriedades, aba evento, Após atualizar, clicar e vá em procedimentos de eventos.

Vai abrir a janela do VBA.

Aqui vamos escrever o código para inserir dados que você pretender. Façamos desse modo:

me.artnome = me.nome_da_sua_combo_aqui. column(1)

Vá até a consulta que você criou, e veja a sequência de campos, procure escreve isso em uma folha para não se perder, lembrando que a chave primária o valor dela é 0 (zero), os demais campos vem na sequência..1...2...3....

No meu exemplo que lhe passei, tem uma combo, qualquer duvida vai lá, para ver como eu escrevi.

Mas, tem que melhorar a estrutura do teu projeto, pois está muito confuso a parametrização de dados.

Procure não colocar nos campos das tabelas palavras com acentos e nem espaços.

Na tbDetalhes, insira um campo IdCabecalho, tipo numero e corrija o relacionamentos entre essa tabela e a Tbcabecalhos.

Relacione ambas por idcabecalho, um para muitos ( tbcabecalho com tb detalhes ).

Estarei fora, agora na parte da manhã porém a tarde me farei presente aqui no escritório.

Vai ter um pouco de trabalho, mas é valido, sempre é bom refazermos para aprendermos.


Abraços a si.

Bom dia Sílvio
Está resolvido, muito obrigado pelas dicas

tenho que deixar um agradecimento ao Forum que permitiu a partilha de conhecimentos.

Jorge