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


3 participantes

    Ocultar campos vazios no formulário.

    julianovv
    julianovv
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 684
    Registrado : 14/12/2010

    Ocultar campos vazios no formulário. Empty Ocultar campos vazios no formulário.

    Mensagem  julianovv Qua 25 Set 2024, 16:55

    Bom dia. Tenho um formulário pop que lista empresas cadastradas com endereço, telefone, CNPJ, etc. Algumas não possuem campos preenchidos. É possível ocultar os campos vazios e reorganizar para não ficar um vácuo entre entre eles?
    Desde já agradeço.

    Juliano

    Wink


    .................................................................................
    Juliano

    USO O ACCESS 2007 NO XP SP3
    Pentil 4 Duo Core 2 - 3.2 ghz - HD 250 GB ATA II - Placa Asus P5QPL-AM - 2 GB de memória DDR2 667 mhz Kingston - NVidia GForce GT 370 - Monitor AOC 24 pol G2HE524G2 - Impressora Epson T33 - Scanner Bright.
    Smile
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2739
    Registrado : 23/01/2018

    Ocultar campos vazios no formulário. Empty Re: Ocultar campos vazios no formulário.

    Mensagem  crysostomo Qua 25 Set 2024, 17:41

    Está dentro da lista? Se for não faz sentido, porque um usuário não tenha e outro tenha, vai ocutar as duas


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    julianovv
    julianovv
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 684
    Registrado : 14/12/2010

    Ocultar campos vazios no formulário. Empty Res: Ocultar campos vazios no formulário.

    Mensagem  julianovv Qua 25 Set 2024, 18:43

    Sim, todas as empresas tem os campos em comum como endereço, telefone, CEP, email, mas empresas como bancos, além dos campos-padrão tem número de agência, número da conta, token (número de série do leitor de código), contato (gerente) e outras só tem o telefone. A edição (editar ou adicionar) é feita por fora na tabela.

    Ocultar campos vazios no formulário. Dados_14



    Rolling Eyes


    .................................................................................
    Juliano

    USO O ACCESS 2007 NO XP SP3
    Pentil 4 Duo Core 2 - 3.2 ghz - HD 250 GB ATA II - Placa Asus P5QPL-AM - 2 GB de memória DDR2 667 mhz Kingston - NVidia GForce GT 370 - Monitor AOC 24 pol G2HE524G2 - Impressora Epson T33 - Scanner Bright.
    Smile
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2739
    Registrado : 23/01/2018

    Ocultar campos vazios no formulário. Empty Re: Ocultar campos vazios no formulário.

    Mensagem  crysostomo Qua 25 Set 2024, 23:10

    Assim, é lista sem coluna.

    Código:
    Private Sub Form_Current()
        Dim ctl As Control
        
        ' Loop através de todos os controles no formulário
        For Each ctl In Me.Controls
            ' Verifica se o controle é um campo de texto
            If TypeOf ctl Is TextBox Then
                ' Imprime o nome e valor do controle para depuração
                Debug.Print "Controle: " & ctl.Name & ", Valor: " & Nz(ctl.Value, "")
             If IsNull(ctl.Value) Or Trim(ctl.Value) = "" Then
                    ctl.Visible = False
                  
                Else
                    ctl.Visible = True
                End If
            End If
        Next ctl
    End Sub


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

    julianovv gosta desta mensagem

    julianovv
    julianovv
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 684
    Registrado : 14/12/2010

    Ocultar campos vazios no formulário. Empty Res: Ocultar campos vazios no formulário.

    Mensagem  julianovv Qui 26 Set 2024, 01:23

    Obrigado. Deu quase certo. Os campos ficaram ocultos mas entre eles ficou o vácuo. Lembro que cheguei a fazer isso em relatório e funcionou perfeitamente mas não em formulário baseado em tabela como esse.
    Segue a imagem:

    Ocultar campos vazios no formulário. Dados_15

    Wink


    .................................................................................
    Juliano

    USO O ACCESS 2007 NO XP SP3
    Pentil 4 Duo Core 2 - 3.2 ghz - HD 250 GB ATA II - Placa Asus P5QPL-AM - 2 GB de memória DDR2 667 mhz Kingston - NVidia GForce GT 370 - Monitor AOC 24 pol G2HE524G2 - Impressora Epson T33 - Scanner Bright.
    Smile
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3452
    Registrado : 13/12/2016

    Ocultar campos vazios no formulário. Empty Re: Ocultar campos vazios no formulário.

    Mensagem  Alexandre Fim Qui 26 Set 2024, 02:23

    Boa noite Juliano,

    Essa questão de "esconder" os controles quando eles não trazem valor é uma prática antiga e descontinuada, mas se você pretende prosseguir com este ajuste, minha sugestão é ajustar dinamicamente a propriedade "Top" de cada controle toda vez que algum deles ficar invisível.

    Inclusive, é possível adaptar o código que o caro amigo Crysostomo disponibilizou para esta situação também.

    Ou você pode desabilitar (Propriedade Enabled = False) os campos com vazios.

    Compartilha uma copia do seu bd, somente objetos pertinentes ao problema, para análise e solução.

    É isso

    Att,

    Alexandre Fim


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Ocultar campos vazios no formulário. Setinf11
    Sistemas e Tecnologia Ltda

    julianovv e crysostomo gostam desta mensagem

    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2739
    Registrado : 23/01/2018

    Ocultar campos vazios no formulário. Empty Re: Ocultar campos vazios no formulário.

    Mensagem  crysostomo Qui 26 Set 2024, 02:27

    Julianovv, boa noite, cara, pois essa reorganização é complicado no momento. No caso iria fazer outro tipo de controle, tipo, cada campo teria seu segundo campo "igual", ou seja, oculta o campo pai e exibir o campo filho.
    Vamos esperar outros colegas a verem isso e nós dar um código mais claro.
    Atte.
    desculpe Alexandre estávamos digitando junto nem vi sua mensagem.


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

    julianovv gosta desta mensagem

    julianovv
    julianovv
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 684
    Registrado : 14/12/2010

    Ocultar campos vazios no formulário. Empty Res: Ocultar campos vazios no formulário.

    Mensagem  julianovv Qui 26 Set 2024, 15:14

    Obrigado Crysostomo e Alexandre Fim. Acho que é complicado mesmo. Vou tentar de outra forma criando 2 subformulários com a mesma tabela com seus campos relacionados.

    Obrigado! Wink


    .................................................................................
    Juliano

    USO O ACCESS 2007 NO XP SP3
    Pentil 4 Duo Core 2 - 3.2 ghz - HD 250 GB ATA II - Placa Asus P5QPL-AM - 2 GB de memória DDR2 667 mhz Kingston - NVidia GForce GT 370 - Monitor AOC 24 pol G2HE524G2 - Impressora Epson T33 - Scanner Bright.
    Smile

    crysostomo gosta desta mensagem

    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2739
    Registrado : 23/01/2018

    Ocultar campos vazios no formulário. Empty Re: Ocultar campos vazios no formulário.

    Mensagem  crysostomo Sáb 28 Set 2024, 21:24

    Sucesso.
    Coloque o Tópico como resolvido


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

    Conteúdo patrocinado


    Ocultar campos vazios no formulário. Empty Re: Ocultar campos vazios no formulário.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Ter 08 Out 2024, 20:14