Clicar em Listbox e abrir relatório.

Olá,

Apenas substitui as linhas comentadas, conforme abaixo:

Código:



Private Sub Lista14_DblClick(Cancel As Integer)
On Error GoTo Err_Lista14_Click
Dim stDocName           As String
Dim stLinkCriteria      As String

    If IsNull(Me.Lista14) Then
        MsgBox "Selecione um nome válido na lista", vbCritical, "Atenção"
        Exit Sub
    End If


    'stDocName = "Consulta Material"
    stDocName = "[INFORME_AQUI_O_NOME_DO_SEU_RELATORIO]"
    stLinkCriteria = "[Item]=" & Me![Lista14]
    'DoCmd.OpenForm stDocName, , , stLinkCriteria
    DoCmd.OpenReport stDocName, acViewPreview, , stLinkCriteria



Exit_Lista14_Click:
Exit Sub

Err_Lista14_Click:
MsgBox Err.Description
Resume Exit_Lista14_Click
End Sub



OBS: Antes, é necessário criar a consulta e o relatório baseado nesta consulta.

É isso.

Espero ter ajudado

[]'s

FIM

Qual é o formulário que precisa ajustar?

Raphael,

Segue o ajuste que vc me pediu anteriormente.

OBS: Sempre que criar relatórios, utilize o modo "Visualização de Impressão", pois o Access já exibe a Faixa de Opções para impressão e Exportação de dados, conforme abaixo:



Tomei a liberdade para ajustar seu relatório.

Segue versão

[]'s

FIM

Ok Lisbeky,

Vou verificar o que aconteceu e já retorno.

[]'s

FIM

Qual seria o problema no teu sistema?
Especifique, por gentileza.

No aguardo.

Ok...fique tranquilo.
Vamos analisar e resolver o teu problema.

Aguarde.

O erro é aqui, né?

Lisbeky,

Os dados estão totalmente equivocados:



Você está utilizando uma Lista de Valores com a descrição dos materiais? Está errado !!

A tabela "produto" deve armazenar dados do produto somente, tais como:
- Código
- Descrição
- Unidade de Medida (kg, l, ml, pacote e etc)
- Fornecedor

Vc está utilizando a tabela como entrada/saida do produto, e isso deveria ser feito em outra tabela, por exemplo TB_ESTOQUE.

Antes de arrumar o que vc pediu, é necessário arrumar esta situação.

Vou criar um modelo e ai vc adapta, pois, do jeito que está, vc não vai conseguir realizar seus controles de produtos, venda e etc.

Aguarde

Lisbeky,

Fizemos apenas um ajuste simples no listbox para imprimir o relatório.

Eu acho muito louvável e legal quando alguém se predispõe em desenvolver um sistema no Access, criando ferramentas para auxiliar suas atividades diária, e até mesmo, um sistema para a empresa. É muito gratificante.

Infelizmente, do jeito que está, vai complicar mais a sua vida, pq vc terá de fazer "remendos" (ou marretadas, como se diz em desenvolvimento) para ajustar o "ajuste"...rsss

Também analisei as tabelas e elas estão pobres em MODELAGEM de dados:

"A modelagem de dados é o processo de visualização e concepção de dados para armazenamento em um data warehouse. O modelo é uma representação conceitual dos dados, dos relacionamentos entre os dados e das regras."

Precisa tambem de NORMALIZAÇÃO de tabelas:

Normalização é o processo de organização de dados em um banco de dados. Isso inclui a criação de tabelas e o estabelecimento de relações entre essas tabelas de acordo com as regras projetadas para proteger os dados e tornar o banco de dados mais flexível, eliminando a redundância e a dependência inconsistente.

OBSERVAÇÕES:
- Alguns campos estão separados com espaço "Setor Principal","Setor Secundário","Preço Unitário" e etc., que prejudica na hora de programar em VBA e/ou trabalhar com expressões em consultas também.
Deve-se usar desta forma: "setor_principal", "preco_unit" e etc.

- A maioria dos campos está com o tamamanho padrão do Access, ou seja, 255 caracteres. Isto aumenta o bd de dados sem necessidade, e também atrapalha quando fizer uma busca neste campo e etc.

OBS: Os formulários também não tem nenhuma validação de dados (preenchimento correto dos campos), o que pode gerar inumeros problemas

Portanto, minha sugestão é que sejam feitas as melhorias agora para que vc não tenha problemas futuros.

Vou criar um modelo de dados (tabelas relacionadas) o mais simples possível, para atender a tua necessidade.

Sugiro também que você estude um pouco mais o Access, assista videos no Youtube e etc. para aprimorar seus conhecimentos na ferramenta.

É Isso !!!

[]'s

FIM

Por enquanto, a estrutura e o modelo do sistema está ficando assim:




Observações:
- TB_PEDIDO: grava os dados do cabeçalho do pedido
- TB_PEDIDO_DET: grava os dados do detalhe do pedido

Lisbeky bom dia,

O modelo que eu proponho é simples.
As tabelas principais são as de Material e Estoque, e as demais são tabelas auxiliares que servirão de suporte para outras informações.

Os usuários que irão utilizar o sistema não precisam, necessariamente, acessar essas tabelas/formulários auxiliares. Isso seria mais para o "administrador" do sistema.

Como disse anteriormente, a estrutura do sistema está precária e os dados estão equivocados, justamente porque o sistema não tem o mínimo de normalização.

A idéia é criar as tabelas para que elas se relacionem e que você possa buscar os dados necessários para o teu controle.

Para voce ter um controle efetivo de entrada e saida de material, é necessário criar registros que caracterizam estes movimentos, para que vc tenha histórico do que entrou e o que saiu de material.

No sistema existe um formulário onde vc "atualiza" os dados, ou seja, vc só está alterando valores, e não criando Entradas e Saidas do produto.

Do jeito que está, é melhor utilizar o Excel.

Estou finalizando o modelo em cima do que voce criou, e quando terminar eu disponibilizo para voce entender melhor como funciona a estrutura.

É simples ...não tem nada de complicado.

Voce só precisa entender que o Access não é o Excel...rsss

Até mais

[]'s

FIM

Raphael,

Eu já tinha um modelo de sistema de controle de estoque e achei melhor disponibilizá-lo ao invés de alterar o seu.

O sistema é bem simples e com poucas tabelas:



Formulário de Movimentações é bem intuitivo de operar:


Cadastro de Produtos, que também carregas o histórico de movimentações:



Relatorios de Entrada, Saida e Posição de Estoque Sintética:








Ainda faltam algumas validações no preenchimento dos campos, mas as melhorias ficam por sua conta...rsss

Agora é só trabalhar em cima deste modelo

Acredito que é isso que vc precisa.

Espero ter ajudado

Boa sorte

[]'s

FIM