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
Marcelo David
andre.lr
6 participantes

    [Resolvido]Selecionar várias opções em um grupo de opções

    andre.lr
    andre.lr
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 222
    Registrado : 17/10/2011

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Selecionar várias opções em um grupo de opções

    Mensagem  andre.lr 14/3/2012, 19:36

    Amigos, a questão é a mesma do título, tem alguma forma talvez via código, de selecionar mais de uma opção num grupo de opções??

    Já vi um tópico questionando a mesma coisa, mas abri esse, pois, a resposta do citado tópico foi que ele não deveria utilizar um grupo de opções e sim vários botões de opção vinculados a respectivos campos cada um para cada opção que ele tivesse no formulário.

    Contudo, porém, todavia, estou necessitando criar vários grupos de opção e pra ser mais exato 30 grupos de opções com 15 opções cada um onde eu possa selecionar quantas opções sejam necessárias...

    tem como fazer isso via código?

    O meu caso é que se eu criar um botão de opção para cada opção que eu tenho no meu formulário vou ter que criar cerca de 450 botões, cada um vinculado a um campo, e isso seria mais do que o limite de 255 campos por tabela e por formulário!

    To ficando louco já galera affraid ....

    Imaginem um formulário onde eu tenha além dos campos tradicionais de data, texto, nome, etc etc etc... tenha também cerca de 450 botões de opções que podem ser até mesmo todas selecionadas de uma só vez em um só registro e todas tem que ser salvas ou vinculadas de alguma forma;....
    porém com o limite de 255 campos por tabela e por formulário isso se torna impossível....

    se fosse possível selecionar varias opções e um único grupo de opções meu problema estaria resolvido....

    estou deixando aqui anexo também a estrutura do meu formulário para quem puder dar uma análisda POR FAVOR!

    Obrigado + uma vez!
    Anexos
    [Resolvido]Selecionar várias opções em um grupo de opções Attachment255campos.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (152 Kb) Baixado 128 vez(es)
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3857
    Registrado : 21/04/2011

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  Marcelo David 14/3/2012, 19:58

    Use as checkbox normal, dái você faz o que deseja


    .................................................................................
    Aprenda como criar formulário desacoplado.
    Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Selecionar várias opções em um grupo de opções Marcel11
    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]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  criquio 14/3/2012, 20:16

    O que acontece é que um quadro de opções salva a opção escolhida em apenas um campo da tabela, ou seja, ele pega o número de identificação da opção escolhida. Por isso a impossibilidade de se escolher mais de uma opção. Uma saída poderia ser colocar as chackbox sem ser por grupo de opções, pois o formulário aceita mais de 255 campos. Depois, via vba, você pode colocar todas as opções de um grupo em um único campo. Vamos supor que um grupo de opções tenha as opções op1 até op20 e o usuário tenha selecionado as opções op2, op5, op12 e op17. Em um único campo da tabela que representa esse grupo de opções, ficaria assim: op2,op5,op12,op17. Quando for consultar esse registro, pode ter uma função que faz um split no campo separando os dados pela vírgula, marcando aqueles checkboxes cujo nome estiver na lista.


    .................................................................................
    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.

    andre.lr
    andre.lr
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 222
    Registrado : 17/10/2011

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  andre.lr 14/3/2012, 20:51

    Vamos ver se entendi Criquio, você diz colocar todas opções como checkbox sem grupo mesmo e depois via VBA fazer um split de todos os check box para salvar as check box que foram selecionadas em um único campo separados por vírgula. É + ou - isso?

    Se for, como ficaria o código?

    você poderia me dar um exemplo ai com 5 check box pra mim ver como vou ter que fazer? com 450 =]
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8443
    Registrado : 05/11/2009

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  Alexandre Neves 14/3/2012, 20:56

    André,

    Pode ser feito como o Amigo Criquio indicou. Melhor, será criar o formulário com a lógica pretendida que, depois, nós o ajudaremos no código
    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]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  criquio 14/3/2012, 21:24

    Na verdade, o Split seria para quando for consultar um registro já gravado, aonde seria feita a separação pela vírgula. Para gravar os dados, seria o contrário, você faria a junção dos nomes de todos os que estiver marcado. Para facilitar, eu nomearia os checkbox pegando parte do nome do grupo. Vamos supor um grupo de Materiais. Os checkboxes desse grupo se chamariam Mat0 até Mat19 por exemplo. Você poderia ter algo assim:

    Código:
    Dim N As Integer

    For N = 0 To 19
        If Me("Mat" & N) = -1 Then
            If IsNull(Me.NomeDeUmCampo) Or Me.NomeDeUmCampo.Value = "" Then
                Me.NomeDeUmCampo = "Mat" & N
            Else
                Me.NomeDeUmCampo = Me.NomeDeUmCampo & ",Mat" & N
            End If
        End If
    Next
    Isso seria para colocar os nomes de todos os checkboxes selecionados dentro de um campo no formulário. Mas pode ser alterado para gravar direto na tabela ao clicar em um botão de salvar na tabela.
    Para fazer a consulta marcando os campos cujos nomes estiverem na lista desse campo da tabela é que usaria o Split. Algo parecido com:

    Código:
    Dim Nomes As String, Lista As Variant, N As Integer

    Nomes = rs!Materiais
    Lista = Split(Nomes, ",")

    For N = 0 To UBound(Lista)
        Me("Mat" & N) = -1
    Next
    Com esse segundo bloco, marcaria-se todos os checkboxes cujos nomes estivessem na lista.


    .................................................................................
    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.

    andre.lr
    andre.lr
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 222
    Registrado : 17/10/2011

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  andre.lr 15/3/2012, 19:49

    Então amigos, até tentei escrever o código aqui, mas ainda sei muito pouco de vba, o formulário com a lógica que eu vou usar é esse que anexei na primeira menssagem desse post. Vocês poderiam por favor implantar o código nele ou mesmo em outro exemplo qualquer com poucas opções, que se eu tiver um pequeno exemplo funcionando da forma que me propuseram eu conseguirei implantar em todas as opções do meu formulário!
    Obrigado amigos, tomara que de certo!
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8443
    Registrado : 05/11/2009

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  Alexandre Neves 15/3/2012, 20:15

    Boa noite, andre

    veja este pequeno exemplo que lhe preparei.
    O seu caso parece-me semelhante. Adapte-o
    http://dl.dropbox.com/u/24017093/MaximoAccess/ExemploAndreJr.rar
    andre.lr
    andre.lr
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 222
    Registrado : 17/10/2011

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  andre.lr 16/3/2012, 11:48

    Alexandre, obrigado pela tentativa, mas não é isso! Você colocou botões de opção desaclopados e o código que você colocou só esta fazendo com que ao selecionar todos os botões de dia da semana o botão semana completa fique true, agradeço a tentativa mas isso não é o que eu estou precisando amigo!

    Preciso que OU todas as opções sejam aclopadas a um campo cada em uma tabela para que cada registro do formulário possa ser devidamente registrado e salvo e já adianto que essa opção já se mostrou não ser possível, pois, já tentei de diversas formas usar mais de uma tabela, mas não adianta, se passar de 255 campos não dá mesmoo.... você pode ter 30 tabelas, se a soma dos campos utilizados dessas 30 tabelas no formulário for superior a 255 ele não aceita de jeito nenhum...

    ENTÃO a alternativa que pode dar certo é a que o Criquio propos que é aquele código milagroso, que o criquio diz que faz com que as informções das opções sejam registradas em poucos campos separadas por vírgula e utilizando o Split...
    Era essa opção que gostaria de ver implantada em um exemplo para eu poder adaptar aqui nos meus 450 campos de opções!
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8443
    Registrado : 05/11/2009

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  Alexandre Neves 16/3/2012, 12:14

    Andre,

    Julguei que tinha alguns casos que as opções podiam não ser únicas dentro do grupo de opções.
    Se o grupo de opções lhe serve, não estou a entender o porquê de não lhe servir da forma que o Access o dispõe.
    Se consegue armazenar em menos de 255 é um passo importante. Agora, vamo-nos debruçar em trabalhar cada campo. Assim, crie apenas um campo e no formulário um grupo de opções. Se nos entendermos nesse grupo, avança-se para os restantes.
    andre.lr
    andre.lr
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 222
    Registrado : 17/10/2011

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  andre.lr 16/3/2012, 12:43

    Alexandre você julgou corretamente, na verdade no meu formulário todas as opções podem ser selecionadas em um unico registro ao mesmo tempo.

    Alexandre se você se der o trabalho de fazer o download do exemplo que anexei no primeiro post chamado 255campos.ZIP e der uma análisada nele no modo design dele no modo formulário, for lá e clicar nos quadradinhos que tem lá você vai acabar entendendo perfeitamente o que eu estou me matando pra tentar explicar e também vai ver que eu já consegui uma forma de fazer os campos poderem ser selecionados ao mesmo tempo com um X.... só não consegui ainda foi preencher todos os quadradinhos até a ultima linha e isso você pode enxergar no modo design do meu formulário.... vai ver q está incompleto pois está até a 11º linha apenas!
    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]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  criquio 16/3/2012, 12:54

    Aqui eis um exemplo conforme eu havia entendido. Leia a descrição no formulário.
    Anexos
    [Resolvido]Selecionar várias opções em um grupo de opções AttachmentGrupoCheckboxUmCampoDaTabela.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (20 Kb) Baixado 298 vez(es)


    .................................................................................
    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.

    andre.lr
    andre.lr
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 222
    Registrado : 17/10/2011

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  andre.lr 16/3/2012, 13:20

    Aeeeeee \o/ era isso que eu precisava mesmo Criquio, você conseguiu uma forma de salvar a seleção de várias opções em apenas um campo =D
    Agora só vou adptar isso as minhas 450 opções kkkk e pronto! vai dar um trabalhinho extra mais vai dar certo!
    Obrigado por mais esse código milagroso parceiro!! =]
    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]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  criquio 16/3/2012, 14:39

    Ótimo que ajudou. Agradecemos pelo retorno.


    .................................................................................
    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.

    andre.lr
    andre.lr
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 222
    Registrado : 17/10/2011

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  andre.lr 16/3/2012, 20:45

    Concerteza ajudou Criquio, agora só mais uma questão!

    Tem como fazer esse mesmo código ao invés de CBox Checkbox para caixa de texto?

    Pq não sei se você tinha reparado no meu exemplo que anexei, mas eu estava trabalhando com caixas de texto onde no primeiro clique aparecia um x e com 2 cliques sumia e também coloquei nelas a regra de validação = a "x"

    Queria continuar a usar as caixas de texto pq as Checkbox não estão ficando bem centralizadas e a linha delas não fica transparente o que deixou meu formulário um pouco feio =]

    Tem como fazer para caixas de texto amigo? Se sim como seria?
    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]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  criquio 16/3/2012, 22:05

    Poucas alterações:

    Código:
    Private Sub btnConfirmar_Click()

    Dim CBox As Control

    For Each CBox In Me.Controls
        If CBox.ControlType = acTextBox Then
            If CBox.Name <> "txtCampos" Then
                If CBox.Value = "X" Then
                    If IsNull(Me.txtCampos) Or Me.txtCampos.Value = "" Then
                        Me.txtCampos = CBox.Name
                    Else
                        Me.txtCampos = Me.txtCampos & "," & CBox.Name
                    End If
                End If
            End If
        End If
    Next

    End Sub

    Código:
    Private Sub Form_Current()

    Dim CBox As Control

    For Each CBox In Me.Controls
        If CBox.ControlType = acTextBox Then
            If CBox.Name <> "txtCampos" Then
                CBox.Value = ""
            End If
        End If
    Next

    If Not IsNull(Me.txtCampos) Then
        Dim Nomes As String, Lista As Variant, N As Integer

        Lista = Split(Me.txtCampos, ",")

        For N = 0 To UBound(Lista)
            Me("" & Lista(N) & "").Value = "X"
        Next
    Else
    End If

    End Sub


    .................................................................................
    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.

    andre.lr
    andre.lr
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 222
    Registrado : 17/10/2011

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  andre.lr 20/3/2012, 13:09

    Beleza Criquio, fiz as alterações e deu alguns bugs com as outras caixas de texto que não tinham nada ver com a história, apesar disso, funcionou depois que eu reconstrui o formulário e a tabela do zero!

    Maasss já esbarrei em um novo probleminha, o espaço do campo Materiais, que ficou como "txtCampos" se tornou insuficiente para receber os dados, quando percebi esse probleminha no inico eu fui adicionando ao código no evento "no atual" algumas linhas que apagam o conteúdo do campo antes de inserir mais dados, tipo assim:

    tenho 465 caixas de texto recebendo o valor "x" ao serem clicadas, elas se chamam T1, T2, T3, ..., T464, T465
    conforme clico nelas, elas recebem o "x" e o campo "Materiais" txtCampos recebe o nome delas conforme seu condigo ou seja: T1, T2, T3 e todas as que foram selecionadas... porém esse espaço se tornou insuficiente em um certo ponto, então inseri códigos no evento "no atual" para apagar o conteúdo dessas caixas de texto antes de adicionar mais conteúdo, da seguinte forma:

    Private Sub Form_Current()
    T1 = ""
    T2 = ""
    t3 = ""
    T4 = ""
    T5 = ""
    T6 = ""
    T7 = ""
    ...
    e assim por diante até 465...
    ...
    T464 = ""
    T465 = ""

    Dim CBox As Control

    For Each CBox In Me.Controls
    If CBox.ControlType = acTextBox Then
    If CBox.Name <> "txtCampos" Then

    End If
    End If
    Next

    If Not IsNull(Me.txtCampos) Then
    Dim Nomes As String, Lista As Variant, N As Integer

    Lista = Split(Me.txtCampos, ",")

    For N = 0 To UBound(Lista)
    Me("" & Lista(N) & "") = "x"
    Next
    Else
    End If

    End Sub



    Estava indo tudo bem, ((PORÉM)), como para não perder a graça sempre tem que ter um porém, ocorreu que quando eu preencho com o "x" o total de 67 caixas de texto dando um clique e tento então confirmar com o botão confirmar ocorre que o espaço do campo "Materiais", txtCampos se torna insuficiente, mesmo apagando ele antes de inserir novos dados!

    Aparece a menssagem de Erro em tempo de execução, o campo é muito pequeno para aceitar a quantidade de dados que você tentou adicionar. Tente inserir menos dados.

    Bom eu tentei solucionar criando um novo campo na tabela para receber mais dados chamado "Materiais1" e coloquei o noem dele de "txtCampos1"

    tentei adicionar linhas de códigos constando este novo campo, mas, esbarrei na minha limitação como programador!

    Enfim amigo Criquio gostaria que fosse possível no formulário selecionar todas as 465 caixas de texto por registro e salvar as mesmas via código em quantos campos forem necessários, sendo assim, A QUESTÃO É! Como fazer para adicionar os dados que não cabem mais no campo txtCampos em um novo campo chamado txtCampos1??
    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]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  criquio 20/3/2012, 13:29

    Qual é o tipo do campo na tabela? Se não estiver como memorando, tente colocar. Uma dica adicional para ignorar campos na hora de pegar os nomes deles. Vamos supor que tenha uns 10 campos que não devem entrar na roda. Você ir nas propriedades deles, na abra Outra, linha Marca e digitar algo como ForaDaRoda e então adicionar como critério na função:

    For Each CBox In Me.Controls
    If CBox.ControlType = acTextBox Then
    If CBox.Tag <> "ForaDaRoda" Then
    ...


    Tem outra propriedade que pode ser usada tambem. É a linha "Marcas inteligentes" da aba Dados. Na função, ficaria assim:

    For Each CBox In Me.Controls
    If CBox.ControlType = acTextBox Then
    If CBox.SmartTag <> "ForaDaRoda" Then
    ...


    .................................................................................
    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.

    andre.lr
    andre.lr
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 222
    Registrado : 17/10/2011

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  andre.lr 20/3/2012, 14:18

    Criquio obrigado novamente, eu na afobação ne percebi que o campo estava como texto mesmo!

    Coloquei como memorando e acabou o problema de espaço, bom pelo menos até agora, pq ainda não terminei de colocar todos os 465 campos, mas acredito que em memorando vai caber tudo =D

    Obrigado pela dica adicional, nem imaginava para que servia aquela Tag e smartTag =]
    Moêma
    Moêma
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 13
    Registrado : 25/08/2010

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Várias opções marcadas e armazenadas

    Mensagem  Moêma 8/11/2012, 15:02

    Bom dia a todos. Estou precisando dessa mesma função e ao testar
    o exemplo, percebi que depois de confirmado não consigo desmarcar e salvar
    em branco ou até mesmo com novas marcações. Ele acumula,com repetição. O que fazer?
    Agradecida.
    Abraços
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8443
    Registrado : 05/11/2009

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  Alexandre Neves 8/11/2012, 16:47

    Boa tarde, Moêma
    Não percebi qual parte não funciona. Mesmo assim, disponibilize parte da bd que não funciona para se avaliar


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    Moêma
    Moêma
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 13
    Registrado : 25/08/2010

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  Moêma 12/11/2012, 03:02

    Oi Alexandre, testei o exemplo Grupocheckbox.... Os outros vou testa e dou retorno. Obgda
    avatar
    JorgePedro
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 17/05/2016

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Boa tarde

    Mensagem  JorgePedro 22/5/2016, 17:42

    Boa tarde pessoal, eu precisava de mais ou menos a mesma coisa. Porém, com alguns detalhes. Eu estou usando em um formulário de cadastro, e desejo marcar para definir determinada característica. Por exemplo, faço cadastro de uma pessoa, e defino se essa pessoa vai ser um cliente, ou um fornecedor, ou ambos. É possível? Vou anexar uma imagem para ficar mais fácil visualizar.[img][Resolvido]Selecionar várias opções em um grupo de opções F250zb[/img]

    Desde já, obrigado
    Moêma
    Moêma
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 13
    Registrado : 25/08/2010

    [Resolvido]Selecionar várias opções em um grupo de opções Empty Programa onde seleciono várias opções

    Mensagem  Moêma 5/8/2016, 14:47

    bom dia a todos!
    Este programa desenvolvi para Assistência Social. Deixei para ser testado para depois finalizá-lo.


    Disponibilizo para vocês.
    O que eu queria fazer se encontra na segunda aba (Situação Familiar (Vulnerabilidade).

    Espero que possa ajudar com esse exemplo.

    Usuário: admin
    Senha: admin

    Para liberar a aba Ribbon, clique em Permissão e senha = trindade

    Boa sorte!! flower

    Conteúdo patrocinado


    [Resolvido]Selecionar várias opções em um grupo de opções Empty Re: [Resolvido]Selecionar várias opções em um grupo de opções

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/3/2024, 01:41