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

    [Resolvido]Alterar conteúdo do campo de impressão

    avatar
    ricaalm
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 21/05/2010

    [Resolvido]Alterar conteúdo do campo de impressão Empty [Resolvido]Alterar conteúdo do campo de impressão

    Mensagem  ricaalm 21/5/2010, 19:07

    Olá amigos
    Mais uma vez venho buscar ajuda. Estou montando um relatório com base em uma tabela cujo um dos campo denominado "Bloqueio" é do tipo boolean. Quando arrasto este campo para o relatório, aparece um checkbox. Ao invez disse eu preciso que apareca a literal "Bloquado" ou "Liberado" dependendo o conteudo (true/false) do campo "Bloqueio" de minha tabela.
    Alguém tem alguma ideia de como resolver isto ?

    Obrigado
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11026
    Registrado : 04/11/2009

    [Resolvido]Alterar conteúdo do campo de impressão Empty Re: [Resolvido]Alterar conteúdo do campo de impressão

    Mensagem  JPaulo 21/5/2010, 19:24

    Você não consegue manipular esse tipo de campo.

    O que se tem feito, é colocar esse campo como oculto.

    Em cima dele colocar dois rótulos, lblBloqueado e lblLiberado

    No evento ao imprimir;

    Private Sub Detalhe_Print(Cancel As Integer, PrintCount As Integer)
    If Me.SuaChekbox.Value = -1 Then
    Me.lblBloqueado.Visible = True
    Me.lblLiberado.Visible = False
    Else
    Me.lblBloqueado.Visible = False
    Me.lblLiberado.Visible = True
    End If
    End Sub


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Alterar conteúdo do campo de impressão Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Alterar conteúdo do campo de impressão Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Alterar conteúdo do campo de impressão Folder_announce_new Instruções SQL como utilizar...
    avatar
    ricaalm
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 21/05/2010

    [Resolvido]Alterar conteúdo do campo de impressão Empty Re: [Resolvido]Alterar conteúdo do campo de impressão

    Mensagem  ricaalm 21/5/2010, 19:54

    Olá JPaulo

    Mais uma vez obrigado pela ajuda, porém fiz como vc sugeriu e não está funcionando. Percebi que quando solicito a execução do report o evento "Ao imprimir" não está sendo evocado. Para testar coloquei um MSGBOX dentro deste evento e ela não é acionada, vc tem alguma ideia do que possa ser ?

    Obrigado
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Alterar conteúdo do campo de impressão Empty Re: [Resolvido]Alterar conteúdo do campo de impressão

    Mensagem  Alexandre Neves 21/5/2010, 20:31

    Pode criar uma função num módulo:
    Function BloqueadoExtenso(bolValor as boolean)as string
    if bolValor Then BloqueadoExtenso="Bloqueado" Else BloqueadoExtenso="Liberado"
    End Function

    No código de origem do relatório, em vez de utilizar Bloqueio, utilize BloqueadoExtenso(Bloqueio)
    avatar
    ricaalm
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 21/05/2010

    [Resolvido]Alterar conteúdo do campo de impressão Empty Re: [Resolvido]Alterar conteúdo do campo de impressão

    Mensagem  ricaalm 21/5/2010, 21:08

    Olá Alexandre

    Obrigado pela resposta. Esta opção me pareceu bastante interessante, mas desculpe a pergunta pois sou ainda leigo no access: Onde eu acesso o código de origem o relatório para colocar a chamada da função ?

    Obrigado
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11026
    Registrado : 04/11/2009

    [Resolvido]Alterar conteúdo do campo de impressão Empty Re: [Resolvido]Alterar conteúdo do campo de impressão

    Mensagem  JPaulo 21/5/2010, 21:28

    Não esquecendo o codigo do Grande Alexandre.

    Olhe o simples:

    1º Abra a sua consulta que alimenta o seu relatório, em modo de estrutura (Designe)

    2º Botão direito do mouse no campo Sim/Nao e selecione Propriedades.

    3º Clique na caixa de propriedade Formato e digite o seguinte código:

    ;"Bloqueado";"Liberado"


    4º Clique na guia Pesquisa e selecione Caixa de Texto.

    E voilá...


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Alterar conteúdo do campo de impressão Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Alterar conteúdo do campo de impressão Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Alterar conteúdo do campo de impressão Folder_announce_new Instruções SQL como utilizar...
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11026
    Registrado : 04/11/2009

    [Resolvido]Alterar conteúdo do campo de impressão Empty Re: [Resolvido]Alterar conteúdo do campo de impressão

    Mensagem  JPaulo 21/5/2010, 21:33

    Olha na tabela é chekbox e na consulta está como você pretende, agora é só alimentar o relatorio com essa consulta;

    http://dl.dropbox.com/u/771097/ManipularChekBox.rar


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Alterar conteúdo do campo de impressão Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Alterar conteúdo do campo de impressão Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Alterar conteúdo do campo de impressão Folder_announce_new Instruções SQL como utilizar...
    avatar
    ricaalm
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 21/05/2010

    [Resolvido]Alterar conteúdo do campo de impressão Empty Re: [Resolvido]Alterar conteúdo do campo de impressão

    Mensagem  ricaalm 21/5/2010, 21:50

    Matou a páu, é isso que eu queria, vlw pela dica.

    abs

    Conteúdo patrocinado


    [Resolvido]Alterar conteúdo do campo de impressão Empty Re: [Resolvido]Alterar conteúdo do campo de impressão

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 24/11/2024, 13:51