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 participantes

    Aplicar efeito tachado(em alguns casos) nos campos do Relatório.

    avatar
    GattsWDK
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 1
    Registrado : 02/11/2016

    Aplicar efeito tachado(em alguns casos) nos campos do Relatório. Empty Aplicar efeito tachado(em alguns casos) nos campos do Relatório.

    Mensagem  GattsWDK 15/3/2018, 19:32

    Pessoal,

    Estou tentando deixar os campos do relatório com o efeito tachado, não são todos os casos, quero deixar apenas os clientes que foram validados.

    Na formatação condicional tem apenas negrito, itálico e sublinhado.

    Tentei fazer isso da seguinte maneira:

    Código:


    Private Sub CabeçalhoDoGrupo2_Paint()


    If Me.RISCO = "4" Then

    Me.Linha476.Visible = True

    Else

    Me.Linha476.Visible = False

    End If

    End Sub



    No relatório coloquei a linha em cima dos campos, na hora da impressão ele está ignorando o IF e trazendo a linha em cima de todos os casos. Existe alguma forma de fazer isso?
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5074
    Registrado : 20/04/2011

    Aplicar efeito tachado(em alguns casos) nos campos do Relatório. Empty Re: Aplicar efeito tachado(em alguns casos) nos campos do Relatório.

    Mensagem  Silvio 15/3/2018, 20:19

    Boa tarde.

    Experimente o evento " ao imprimir"


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."

      Data/hora atual: 28/3/2024, 13:42