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


2 participantes

    [Resolvido]Actualização automática de dados em subformulário

    avatar
    João
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 105
    Registrado : 07/10/2010

    [Resolvido]Actualização automática de dados em subformulário Empty Actualização automática de dados em subformulário

    Mensagem  João 7/6/2011, 14:01

    Fiz uma adaptação de um exemplo de parcelamento para me dividir uma localidade em varias secções, faz bem a divisão, acrescentando á tabela Secções, no entant pretendia inserir autmáricamente o n.º da secção e determinadas condições. Os campos que irão entrar na condição, um está no formulário e outro no subformulário e o campo com o n.º da secçã tb está no subformulário, por exemplo pretendia o seguinte:
    Se o N.º de secções (no Formulário) fosse igual a 1 e o n.º da Secção (No subformulário) Fosse tb igual a 1 inserisse no N.º de secção (campo do subformulário Secção N.º 1. Exprimentei com o If, mas estou a fazer qualquer coisa mal que não deu.
    Obrigado.
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Actualização automática de dados em subformulário Empty Re: [Resolvido]Actualização automática de dados em subformulário

    Mensagem  criquio 7/6/2011, 14:04

    Tente formatação condicional usando expressão.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    João
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 105
    Registrado : 07/10/2010

    [Resolvido]Actualização automática de dados em subformulário Empty Re: [Resolvido]Actualização automática de dados em subformulário

    Mensagem  João 7/6/2011, 14:20

    Não consigo, eu estava a tentar:
    If Secção=1 And NºSecções=1 The
    NSecção= "Secção N.º 1"
    ElseIf Secção=2 And NºSecções >1 Then
    NSecção="Secção N.º 2"
    etc....
    dará para perceber melhor
    Obrigado
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Actualização automática de dados em subformulário Empty Re: [Resolvido]Actualização automática de dados em subformulário

    Mensagem  criquio 7/6/2011, 14:28

    Esquematize isso para melhor entendimento:

    Campos Form:

    Campos SubForm:

    Condição:


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    João
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 105
    Registrado : 07/10/2010

    [Resolvido]Actualização automática de dados em subformulário Empty Re: [Resolvido]Actualização automática de dados em subformulário

    Mensagem  João 7/6/2011, 14:38

    Campo do Form: NºSecções
    Campo do subform: Secção
    Condição: Se estes dois campos forem igual a 1 NSecção (Campo do subForm) = Secção N.º 1
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Actualização automática de dados em subformulário Empty Re: [Resolvido]Actualização automática de dados em subformulário

    Mensagem  criquio 7/6/2011, 14:49

    Clique nesse campo que deverá receber o valor pela condição dos outros dois, vá em "Formatação condicional", em "Condição 1", escolha "A expressão" e entre com a condição:

    Iif([Secção]=1 And Formulários!NomeDoForm!NºSecções=1;[NSecção]="Secção N.º 1";"Secção N.º 2")

    No lugar de NomeDoForm, coloque o nome do formulário. Se seu Access for em português, Iif se transformará em SeImed e And se transormará em E. Eu coloquei em inglês porque se seu Access for em inglês, não terá problemas.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    João
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 105
    Registrado : 07/10/2010

    [Resolvido]Actualização automática de dados em subformulário Empty Re: [Resolvido]Actualização automática de dados em subformulário

    Mensagem  João 7/6/2011, 20:31

    Ainda não consegui, acho que falta qualquer coisa uma virgula ou aspas, mas já conferi tudo e não encontro.
    Mas só mais uma coisa que talvez eu me explicasse mal, há situações em que são 7 secções, como há outras que é só uma, dará assim com a formatação condicional ?
    Obrigado
    avatar
    João
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 105
    Registrado : 07/10/2010

    [Resolvido]Actualização automática de dados em subformulário Empty Re: [Resolvido]Actualização automática de dados em subformulário

    Mensagem  João 9/6/2011, 09:31

    já resolvi o assunto.
    Obrigado
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Actualização automática de dados em subformulário Empty Re: [Resolvido]Actualização automática de dados em subformulário

    Mensagem  criquio 9/6/2011, 11:39

    Amigo João, poderia por gentileza postar a solução usada? Isso é muito importante em um forum aonde compartilhamos o conhecimento. Pode ter outros membros precisando da mesma solução.
    Um abraço.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    João
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 105
    Registrado : 07/10/2010

    [Resolvido]Actualização automática de dados em subformulário Empty Re: [Resolvido]Actualização automática de dados em subformulário

    Mensagem  João 11/6/2011, 15:58

    Utilizei o IF
    If Secção=1 And NSecções=1 Then
    NSecção="Secção Unica"
    ElseIf Secção=1 And NSecções >1 Then
    NSecção="Secção N.º 1"
    ....
    End If
    Coloquei na aba "no actual do formulário e dá-me até 7 secções

    Conteúdo patrocinado


    [Resolvido]Actualização automática de dados em subformulário Empty Re: [Resolvido]Actualização automática de dados em subformulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/5/2024, 07:12