[Resolvido]Ocultar e visualizar rotulo no relatorio

Olá amigos,
estou tentando fazer algo no relatório, que é esconder um rotulo onde sua caixa receba valor zero.



Em preto são rótulos que mostram o tamanho (relatório de pedido)
Em vermelho são as quantidades de peças.

Queria que se a quantidade de peças fosse maior que 0(zero) aparecesse caso fosse = a 0(zero) ocultasse

Segue exemplo de um relatório como eu queria que ficasse no meu.



Grato

Obs.: já tentei
if me.rotulo.value >= 1 then
me.caixa.visible= true
else
me.caixa.visible= false
end if

Olá Walter,

Já tentou a formatação condicional deixando a caixa na cor branca???


Nivaldo.

Manda ai um modelo do baita.

Cumprimentos.

Veja bem... Clique no rótulo, com a tecla shift pressionada clique na respectiva caixa, os associe.

Oculte a caixa que o seu rótulo será ocultado junto.

não tentei a formatação condicional, não sei como fazer.
Estou disponibilizando o bd

Leu o que falei acima?

Podes tentar

Agora.... A informação está em uma caixa texto ou em um rótulo?


O texto em vermelho é que tipo de objeto?
if me.rotulo.value >= 1 then
me.caixa.visible= true
else
me.caixa.visible= false

Não seria o contrário?
if me.Caixa.value >= 1 then
me.Rotulo.visible= true
else
me.Rotulo.visible= false


Em testes aqui resultou da seguinte maneira:

If Me.txtExemplo >= 1 Then
    Me.lbExemplo.Visible = False
Else
    Me.lbExemplo.Visible = True
End If
End Sub


Cumprimentos.

Cumprimentos.

o valor recebido na caixa
o que quero ocultar o rotulo

vou tentar o que fez, já associei

voce colocou em qual evento?

Coloque no evento ao Pintar ou ao imprimir da seção

Cumprimentos.

Piloto,
não funcionou
Estou tentando aqui.

Código:

Private Sub Detalhe_Paint()
    If Me.PP.Value >= 1 Then
        Me.rtPP.visible = True
    Else
        Me.rtPP.visible = False
    End If
   
    If Me.[34CA].Value >= 1 Then
        Me.[rt34CA].visible = True
    Else
        Me.[rt34CA].visible = False
    End If

End Sub


Alguém com alguma sugestão???

Olá Walter,

Aproveitando as instruções do amigo Piloto, fiz um exemplo para você.

Analisa e qualquer dúvida é só postar.


Nivaldo.

Amigos,
estou achando que estou com problema com o access.
Vou ter que reinstalar.

Nivaldo teu exemplo deu erro, por isso acho que o access esta com problemas.
Estarei reinstalando, e posteriormente falarei sobre o assunto. Pois creio que estou fazendo certo.

Abraços

Consegui... mas com objeções
1 - Quando muda a grade do produto ele aparece no outro segue imagem.

Deveria aparecer o "P" no produto abaixo com "1"


2 - queria que ficasse como a minha esta imagem

Tire o print e Circule com vermelho mostrando o que deseja que apareça ou não.

O BD que enviou.. não tem como testar.. tem consultas aninhadas.. e está pedindo vários parâmetros..

Veja isso e reenvie.

Cumprimentos.

Tem que colocar no evento correto..

Não é o evento do Form e sim da seçcão..

Clique encima da seção detalhes.. e va no evento ao Imprimir.


Cumprimentos.

1 - Em verde é a referencia da peça, em vermelho é a grade da peça. esta grade é alterada conforme a peça.
Tipo:
calça : 34  ao 54
camisa: P ao GG
Sapato: 33 ao 43
Etc...

O que eu preciso neste relatório
Que apareça conforme a imagem 2, onde em verde a referencia e em vermelho a grade, isso para cada referencia digitada sua grade respectiva.

Imagem do meu programa. (na segunda referencia onde só aparece o "36" deveria aparecer "P" com 1 embaixo


Imagem 2 (como eu desejo que fique)


Estarei vendo o arquivo e disponibilizarei novamente.

Ainda não estou entendendo...

De detalhes... onde quer que oculte o rótulo?
Envie o BD

Cumprimentos.

bd atualizado

ao abrir o relatorio veré que tem 2 produtos digitados quero que o produto 160558 apenas apareça os rótulos onde contenha item digitado o restante desapareça, ou seja, apareça somente o "PP, P, M, G, GG, XG" e seus respectivos itens.
Já no produto 160569 apenas apareça os itens "34, 36, 38, 40, 42, 44, 46, 48, 50, 52, 54" o restante desapareça.
Abraços e obrigado por me ajudar

Ninguém tem uma solução para este problema.
Abraços

Private Sub Detalhe_Print(Cancel As Integer, PrintCount As Integer)
       If Me.cx1 = 0 Then
            Me.rt1.Visible = False
        Else
            Me.rt1.Visible = True
       End If
       If Me.cx2 = 0 Then
            Me.rt2.Visible = False
        Else
            Me.rt2.Visible = True
       End If
End Sub

Renomeei as caixa e rótulos..Cx1 >> rt1 até 0 16

Está feito para os dois primeiros.

Cumprimentos.

Perfeito....

O Fórum agradece o Retorno.