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


    Multipla seleção em caixa de cobinação desvinculada

    avatar
    JIR
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 136
    Registrado : 28/08/2016

    Multipla seleção em caixa de cobinação desvinculada Empty Multipla seleção em caixa de cobinação desvinculada

    Mensagem  JIR 20/2/2021, 00:17

    Boas,

    Tenho um formulário de pesquisa com várias caixas de combinação desvinculadas, numa delas queria que fosse possível multiplas seleções, mas não estou a encontrar a forma

    na caixa de combinação "codausencia" queria selecionar vários códigos ao mesmo tempo

    Multipla seleção em caixa de cobinação desvinculada Multip10
    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4058
    Registrado : 29/06/2012

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  Noobezinho 20/2/2021, 09:52

    José Silva

    As caixas de combinação não tem seleções múltiplas

    Somente as caixas de listagem tem essa propriedade,
    que está na aba outra, na folha de propriedades.

    { }'s

    Balem


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...
    avatar
    JIR
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 136
    Registrado : 28/08/2016

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  JIR 20/2/2021, 16:34

    Olá Noobezinho,

    Agradeço desde já a atenção dispensada

    alterei para caixa de listagem mas ao clicar não assume esses dados na consulta da lista em que tenho o seguinte critério

    Como [Formulários]![frmAusenciasConsulta]![CodAusencia]

    Atenciosamente

    JS
    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4058
    Registrado : 29/06/2012

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  Noobezinho 20/2/2021, 17:30


    Precisaria ver parte do teu projeto com as tabelas, formulário e afins para analisar.


    Balem


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...
    avatar
    JIR
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 136
    Registrado : 28/08/2016

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  JIR 21/2/2021, 17:38

    Olá Noobezinho,

    Separei os modulos que interessam para este tema, e por questões de protecção de dados, alterei os nomes dos colaboradores

    a ideia seria poder fazer múltiplas selecções nos quatro campos que identifico e que podem conter várias seleções cada um deles

    Empresa
    Geografia
    Area Processamento
    CodAusencia

    Agradeço o interesse e a ajuda no conhecimento de Mestre
    Anexos
    Multipla seleção em caixa de cobinação desvinculada AttachmentMultiplaSeleção.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (918 Kb) Baixado 13 vez(es)
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4443
    Registrado : 06/11/2009

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  Assis 21/2/2021, 17:59

    Boa tarde

    + ou - isto ?

    Multipla seleção em caixa de cobinação desvinculada Sem_t180


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    JIR
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 136
    Registrado : 28/08/2016

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  JIR 21/2/2021, 21:18

    Olá Boa Noite, Assis,

    Isso é o que já faz actualmente, mas o que pretendo e já entendido pelo Mestre Noobezinho e é alterar para caixa de listagem e não sei como fazer

    Quero seleccionar vários codigos de ausencia ao mesmo tempo e da forma que tenho só faz um codigo de cada vez

    no exemplo queria seleccionar o codigo ausencia 6000, o 6002 e o 9100, da forma que está só seleciona um de cada vez (ver imagem anexa)

    O mesmo acontece se quiser seleccionar varias empresas ou varias areas de processamento ou geografias

    Multipla seleção em caixa de cobinação desvinculada Auszon10
    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4058
    Registrado : 29/06/2012

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  Noobezinho 23/2/2021, 14:17

    Jose

    Aqui nesse TÓPICO  tem exatamente o que precisa>

    { }'s

    Balem


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...
    avatar
    JIR
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 136
    Registrado : 28/08/2016

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  JIR 25/2/2021, 13:05

    Noobezinho,

    muito obrigado, vou estudar e adaptar à minha situação

    José Silva
    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4058
    Registrado : 29/06/2012

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  Noobezinho 25/2/2021, 13:18

    Ótimo

    Caso necessário, é só voltar a esse tópico e retirar o Resolvido.

    Boa sorte

    Balem


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...
    avatar
    JIR
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 136
    Registrado : 28/08/2016

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  JIR 15/3/2021, 14:51

    Boas, Noobezinho,
    de novo ao tema,

    Tentei adaptar o que sugeriu no tópico que indicou do Mestre JPaulo, mas não dá para o que pretendo, ou então não entendi
    para tornar mais simples, vejamos a figura da mensagem nº 1, pretendo na caixa de combinação seleccionar os os códigos à escolha exemplo 6007, 6010, 6501, 6502, da forma que está só posso seleccionar um de cada vez

    já referiu que tem de ser por caixa de listagem e é isso que ainda não consegui

    quero, onde tem a caixa de combinação para o Tipo Ausencia, colocar uma caixa de listagem onde possa escolher vários códigos a apresentar, e isso ainda não consegui

    JS
    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4058
    Registrado : 29/06/2012

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  Noobezinho 15/3/2021, 15:54

    Jose

    Clicando com o botão direito na caixa de combinação, tem a opção Alterar para, escolha caixa de listagem

    Nessa caixa coloque a consulta que deseja, e na folha de propriedade, na aba OUTRA, escolha

    Seleções Múltiplas = Sim.

    Após selecionar os registros nessa caixa, terá que fazer um loop  For - Next entre os registros selecionados

    para popular o controle que deseja.

    { }'s


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...
    avatar
    JIR
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 136
    Registrado : 28/08/2016

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  JIR 15/3/2021, 16:39

    Olá, Noobezinho,

    A caixa de listagem já tinha feito, o que falta é como fazer o código

    tenho andado na procura pelo forum a ver se encontro algo parecido para testar pois não sei nada de VB

    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4058
    Registrado : 29/06/2012

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  Noobezinho 15/3/2021, 21:54

    Jose

    A função a seguir deve ser colocada em um módulo básico.

    Estude o código abaixo e  adapte-o  no teu projeto.

    Chame a função no evento após atualizar da listbox

    assim:
    selNomes

    {}'s

    Código:

    Function selNomes()
     Dim frm As Form, ctl As Control
     Dim varItm As Variant, intI As Integer
     Set frm = Forms!frm_Func ' nome do fumulário onde está a listbox
     Set ctl = frm!lst_fun          'nome da listbox
     
      
     For Each varItm In ctl.ItemsSelected
         For intI = 0 To ctl.ColumnCount - 1
             Debug.Print ctl.Column(intI, varItm)
         Next intI
         Debug.Print
     Next varItm
      
    End Function


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...
    avatar
    JIR
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 136
    Registrado : 28/08/2016

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  JIR 15/3/2021, 22:46

    Olá Noobezinho,

    Coloquei o modulo

    assim
    Function selNomes()
        Dim frm As Form, ctl As Control
        Dim varItm As Variant, intI As Integer
        Set frm = Forms!frm_Func!frmAusenciasConsulta ' nome do fumulário onde está a listbox
        Set ctl = frm!lst_fun!CodAusencia          'nome da listbox
       
         
        For Each varItm In ctl.ItemsSelected
            For intI = 0 To ctl.ColumnCount - 1
                Debug.Print ctl.Column(intI, varItm)
            Next intI
            Debug.Print
        Next varItm
         
       End Function

    Na caixa de listagem

    Private Sub CodAusencia_AfterUpdate()
    Function selNomes()

    End Function

    mas aparece o seguinte erro

    Multipla seleção em caixa de cobinação desvinculada Compil10
    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4058
    Registrado : 29/06/2012

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  Noobezinho 15/3/2021, 23:11

    Mano, precisa ler mais sobre os controles.

    Veja que Forms!frm_Func é o nome do meu formulário assim como
    frm!lst_fun é no nome da listbox dentro do meu form.

    Esse é o teu código:

       Set frm = frmAusenciasConsulta                             ' nome do fumulário onde está a listbox
       Set ctl = frm!FALTA O NOME DA TUA LISTBOX          'nome da listbox  

    Na imagem

    Veja que uma Function termina com End Function
    e sub termina com End Sub

    O Access está avisando que a tua private sub

    Está sem o End Sub

    Poxa! é só olhar mais abaixo que tem outra sub terminando certo.
    era só ver que a que está selecionada não tem.

    Tem que aprender mais sobre VBA amigo.


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...
    avatar
    JIR
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 136
    Registrado : 28/08/2016

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  JIR 15/3/2021, 23:44

    Olá Noobezinho,

    Só dei conta depois de já ter enviado, mas como alterei e continuou dando o mesmo erro, fiquei baralhado

    alterei conforme disse mas matem o mesmo erro

    anexei para ver que dá o mesmo erro

    JS
    Anexos
    Multipla seleção em caixa de cobinação desvinculada AttachmentMultiplaSeleção_V2.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (852 Kb) Baixado 2 vez(es)
    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4058
    Registrado : 29/06/2012

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  Noobezinho 16/3/2021, 11:08

    Meu amigo
    Explique o funcionamento do teu projeto, pois até eu fiquei perdido nele.
    Me parece que  quer fazer todas as operações em um só formulário, o que é impossível.

    Na consulta colocou  agrupar em todas as colunas, conclusão : não vai ser possível, pois
    Uma coluna(campo da tabela) vai entrar em conflito com outra(s).
    Se coloca data Geral que é data + horário, o Access irá procurar  agrupar todas as datas idênticas inclusive com os segundos,
    e vai encontrar somente um registro para agrupar. retornando assim, todos os registros.
    vc tem um campo datainicial e outro datafinal colocar aquele expressão somente na data final não funciona.
    coloque cada parte em seu campo respectivo.
    Jose, clique para abrir:

    Multipla seleção em caixa de cobinação desvinculada Campos10

    Leia sobre consultas, precisa entender sobre as linhas Total, Critério e Ou.

    O código que enviei, nem colocou onde deveria, pois o nome da listBox (Caixa de combinação) está errado

    Set ctl = CodAusencia         'nome da listbox

    Mas não irá funcionar, porque a consulta que fez tem muitos campos desnecessários.
    foque na tabela tbAusências.

    Por último:
    O Access é um banco de dados relacional, ou seja deve ter relacionamento entre as tabelas.
    O teu aplicativo não tem.
    Alguns nomes são diferentes nos Access do Brasil e de Portugal, vou escrever como é aqui.

    Para fazer o relacionamento, clique na aba Ferramenta de banco de dados e no botão Relações.

    Bem é o que posso fazer para te ajudar no momento.

    { }'s


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...
    avatar
    JIR
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 136
    Registrado : 28/08/2016

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  JIR 16/3/2021, 11:31

    Olá Noobezinho,

    Me envergonhou agora Embarassed , mas vou meter mãos ao trabalho, estudar os temas que referiu e ver até onde serei capaz

    Voltarei

    Obrigado por ensinar a pescar

    JS
    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4058
    Registrado : 29/06/2012

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  Noobezinho 16/3/2021, 11:49

    É isso mesmo, meu amigo

    Ninguém nasceu sabendo, e nunca saberá tudo.

    A vida é um eterno aprendizado, pra em quer aprender.

    Eu programava em clipper quando conheci o MSAccess

    Fiz um sistema para clínica Veterinária, estudando somente um livro

    chamado A bíblia do MSAccess que comprei na livraria, a internet estava gatinhando ainda.

    Esse sistema durou mais de 15 anos até onde sei, pois mudei de cidade, não tive mais contato

    com a clínica.

    Se pretende programar, meu amigo, meta a cara nos estudos, não vai se arrepender.

    { }'s

    Balem


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...

    Conteúdo patrocinado

    Multipla seleção em caixa de cobinação desvinculada Empty Re: Multipla seleção em caixa de cobinação desvinculada

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 15/5/2021, 13:12