MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


    [Resolvido]Carregar Subformulário ao clicar em botão do formulário

    avatar
    leh_fernandes
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3
    Registrado : 29/07/2015

    [Resolvido]Carregar Subformulário ao clicar em botão do formulário Empty [Resolvido]Carregar Subformulário ao clicar em botão do formulário

    Mensagem  leh_fernandes 9/8/2015, 01:21

    Boa noite, Mestres estou precisando de uma ajuda,

    Estou tentado criar um BD para automatizar um tratamento que realizo diariamente.

    Em resumo:

    1- TBL_Base será atualizada diariamente a partir de pastas do Excel.

    2- FRM_Painel ira exibir para o usuário a quantidade sintética de dados que estão pendentes de tratamento.

    3- Ao clicar em algum dado do FRM_Painel é direcionado ao FRM_Tratamento os dados são preenchidos.

    4- Preencher o status e o responsável e clicar em Iniciar ou Concluir.

    5- Criar uma tabela temporária com base em uma consulta com os critérios de TXT_logo,TXT_codigo e txt_entidade.

    6-A tabela temporaria deveria conter os campos logo,codigo,entidade,nome,cpf,matricula,valor,critica,tratamento,observacao.

    7- se o status for feito na previa preciso atualizar com os dados da tabela temporária a TBL_base e marcar o campo concluído (Pois irá concluir diretamente). Se não preciso atualizar o status e responsável a partir da tabela temporária e carregar o subformulário para tratamento após a conclusão clicar em concluído e atualizar os dados.

    Estou com uma dificuldade enorme em realizar o 5,6 e 7.

    Segue o BD.

    https://onedrive.live.com/redir?resid=BE133670FFC6150F!789&authkey=!AIQ7vrykGw9ndvQ&ithint=file%2c7z

    Peço desculpas pelas duvidas bobas, mas comecei agora neste mundo de access.

    Tentei criar a tabela temporaria assim Docmd.RunSQL"CREATE TABLE [Logo] AS Expr1, [Codigo] AS Expr2, [Nome_Entidade] AS Expr3, [Nome_Cliente] AS Expr4, [CPF] AS Expr5, [Matricula] AS Expr6, [Valor] AS Expr7, [Critica] AS Expr8,  "TBL_Temp""

    Mas não dá certo e também não sei como adicionar os dados em seguida.

    Muito obrigado pela atenção.


    Última edição por leh_fernandes em 12/8/2015, 17:57, editado 1 vez(es)
    avatar
    leh_fernandes
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3
    Registrado : 29/07/2015

    [Resolvido]Carregar Subformulário ao clicar em botão do formulário Empty Re: [Resolvido]Carregar Subformulário ao clicar em botão do formulário

    Mensagem  leh_fernandes 9/8/2015, 16:55

    Consegui ajustar o subformulário para receber os dados da tabela temporária.

    Agora precisaria que o botão concluir verifique se no campo tratamento e observação da tabela temporária existe algum campo vazio.

    Se sim teria que exibir um msgbox caso contrario atualizar a tabela temporária e a tabela base.

    estou tentado assim:

    Private Sub Comando29_Click()

    'If DCount("Observacao", "FROM TBL_Temp") = 0 Then
    Dim vcontador As Integer
    contador = DCount("[Observacao]", "TBL_Temp")

    If DCount("[Observacao]", "TBL_Temp") < contador Then

    Tentei também com o dlookup mas não deu muito certo.

    https://onedrive.live.com/redir?resid=BE133670FFC6150F!818&authkey=!AP-sN2UaZBc0wd8&ithint=file%2czip

    Obrigado.

      Data/hora atual: 27/4/2024, 20:02