MaximoAccess

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

Obrigado

Administração do MaximoAccess

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]Problema ao Contar itens de uma Listbox

    avatar
    Luís Antunes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 332
    Registrado : 05/04/2016

    [Resolvido]Problema ao Contar itens de uma Listbox Empty [Resolvido]Problema ao Contar itens de uma Listbox

    Mensagem  Luís Antunes em 6/11/2020, 22:15

    Boas noites
    Precisava, novamente, da vossa ajuda.
    No campo do form tenho este código para contar itens de uma listbox
    =Ise([Lista61].[ListCount]-1<0;"0";[Lista61].[ListCount]-1) que funciona muito bem.
    Acontece que a fórmula bloqueia-me o form e, não faço ideia do que seja
    Tentei um código VBA sem resultado.

    Luís Antunes
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2455
    Registrado : 22/11/2016

    [Resolvido]Problema ao Contar itens de uma Listbox Empty Re: [Resolvido]Problema ao Contar itens de uma Listbox

    Mensagem  DamascenoJr. em 7/11/2020, 00:05

    Impossível essa fórmula bloquear o formulário.

    Experimente olhar as propriedades do formulário sobre adicionar, editar e excluir.

    Ou anexe seu arquivo para análise.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    Luís Antunes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 332
    Registrado : 05/04/2016

    [Resolvido]Problema ao Contar itens de uma Listbox Empty Re: [Resolvido]Problema ao Contar itens de uma Listbox

    Mensagem  Luís Antunes em 7/11/2020, 00:25

    Boa Noite Damasceno
    Não encontrei nada nos comandos Adicionar e Eliminar.
    Quando fecho o formulário aparece,três mensagens seguidas, "Valor do parâmetro" com as ligações das consultas ao form

    Luís Antunes
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2455
    Registrado : 22/11/2016

    [Resolvido]Problema ao Contar itens de uma Listbox Empty Re: [Resolvido]Problema ao Contar itens de uma Listbox

    Mensagem  DamascenoJr. em 7/11/2020, 00:26

    Anexe essa parte do seu arquivo para analisarmos


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    Luís Antunes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 332
    Registrado : 05/04/2016

    [Resolvido]Problema ao Contar itens de uma Listbox Empty Re: [Resolvido]Problema ao Contar itens de uma Listbox

    Mensagem  Luís Antunes em 7/11/2020, 00:49

    Na Parte do projecto a fórmula não afecta o form.
    Posso enviar o projecto completo?

    Luís Antunes
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2455
    Registrado : 22/11/2016

    [Resolvido]Problema ao Contar itens de uma Listbox Empty Re: [Resolvido]Problema ao Contar itens de uma Listbox

    Mensagem  DamascenoJr. em 7/11/2020, 00:50

    Pode ser. Na mensagem também dê detalhes dos passos a serem dados, o que acontece e o que deveria acontecer.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    Luís Antunes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 332
    Registrado : 05/04/2016

    [Resolvido]Problema ao Contar itens de uma Listbox Empty Re: [Resolvido]Problema ao Contar itens de uma Listbox

    Mensagem  Luís Antunes em 7/11/2020, 01:07

    A password=5727
    Ano = 2019
    Rubrica = 02/02/10
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2455
    Registrado : 22/11/2016

    [Resolvido]Problema ao Contar itens de uma Listbox Empty Re: [Resolvido]Problema ao Contar itens de uma Listbox

    Mensagem  DamascenoJr. em 7/11/2020, 01:18

    DamascenoJr. escreveu:dê detalhes dos passos a serem dados, o que acontece e o que deveria acontecer

    Qual é o formulário? Qual o controle que faz a contagem? Em que momento bloqueia? Na abertura? Dê detalhes.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    Luís Antunes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 332
    Registrado : 05/04/2016

    [Resolvido]Problema ao Contar itens de uma Listbox Empty Re: [Resolvido]Problema ao Contar itens de uma Listbox

    Mensagem  Luís Antunes em 7/11/2020, 09:49

    Bom dia Damasceno
    Formulário - Frm_Lancamento
    Aba Introdução de Dados Controle - Texto 602
    Aba Consulta Mensal Controle - Txt_Contagem
    Quando fecha o formulário Aparece 6 mensagens "Valor do parâmetro"
    Vou anexar novamente o meu projecto já com as tabelas
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2455
    Registrado : 22/11/2016

    [Resolvido]Problema ao Contar itens de uma Listbox Empty Re: [Resolvido]Problema ao Contar itens de uma Listbox

    Mensagem  DamascenoJr. em 7/11/2020, 14:14

    Luís, testei aqui e os controles estão contando direitinho os itens das listboxes.

    Afina, o problema é a contagem dos itens ou as mensagens que surgem quando fecha o formulário?


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    Luís Antunes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 332
    Registrado : 05/04/2016

    [Resolvido]Problema ao Contar itens de uma Listbox Empty Re: [Resolvido]Problema ao Contar itens de uma Listbox

    Mensagem  Luís Antunes em 7/11/2020, 15:27

    Boas
    As mensagens é que não deviam aparecer.
    Se eliminar os controles o form fecha normalmente


    Luís Antunes
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2455
    Registrado : 22/11/2016

    [Resolvido]Problema ao Contar itens de uma Listbox Empty Re: [Resolvido]Problema ao Contar itens de uma Listbox

    Mensagem  DamascenoJr. em 7/11/2020, 16:04

    Entendi.

    No evento ao abrir do formulário, defina a fonte do controle dos campos
    Código:
    Me!Texto602.ControlSource = "=Nz(iif(([Lista61].[ListCount]-1) < 0, 0, [Lista61].[ListCount]-1), 0)"
    Me!Txt_Contagem.ControlSource = "=Nz(iif(([Lista9].[ListCount]-1) < 0, 0, [Lista9].[ListCount]-1), 0)"

    E no seu botão de sair, antes de docmd.quit, limpe o valor que foi definido
    Código:
    Me!Texto602.ControlSource = ""
    Me!Txt_Contagem.ControlSource = ""


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    Luís Antunes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 332
    Registrado : 05/04/2016

    [Resolvido]Problema ao Contar itens de uma Listbox Empty Re: [Resolvido]Problema ao Contar itens de uma Listbox

    Mensagem  Luís Antunes em 7/11/2020, 16:19

    Boa tarde Damasceno
    Ficou óptimo
    Só não fiquei a perceber como é que um simples código origina aquelas mensagens ao sair.

    Fico-lhe muita grato pela ajuda

    Luís Antunes
    avatar
    Luís Antunes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 332
    Registrado : 05/04/2016

    [Resolvido]Problema ao Contar itens de uma Listbox Empty Re: [Resolvido]Problema ao Contar itens de uma Listbox

    Mensagem  Luís Antunes em 7/11/2020, 16:21

    Esqueci de pôr o resolvido
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2455
    Registrado : 22/11/2016

    [Resolvido]Problema ao Contar itens de uma Listbox Empty Re: [Resolvido]Problema ao Contar itens de uma Listbox

    Mensagem  DamascenoJr. em 7/11/2020, 16:31

    O fórum agradece o retorno. Sucesso.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

      Data/hora atual: 4/12/2020, 04:12