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


4 participantes

    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero

    avatar
    kleyton_mendes
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 182
    Registrado : 28/03/2011

    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Empty exibir mensagem no relatorio em caso de valor vazio ou zero

    Mensagem  kleyton_mendes 13/10/2011, 17:38

    Boa tarde amigos,

    Venho novamente com minhas perguntas do "é possivel"... rsrs

    Necessito que em um relatório caso o resultado seja vazio ou nulo, ou mesmo zero, que apareça uma textbox com uma msg no relatório que vou escolher ainda, porém somente nestes casos.

    Existe essa possibilidade?
    gilberlanio
    gilberlanio
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 814
    Registrado : 30/08/2010

    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Empty Re: [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero

    Mensagem  gilberlanio 13/10/2011, 17:47

    Não sei se é isso, mais coloque esse código no evento SEM NEM DADO do seu relatório


    Dim strMsg As String, strTitle As String
    Dim intStyle As Integer

    strMsg = "Não existem dados a visualizar nesse período! "
    intStyle = vbOKOnly
    strTitle = "Sem dados no sistema"

    MsgBox strMsg, intStyle, strTitle
    Cancel = True
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Empty Re: [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero

    Mensagem  Marcelo David 13/10/2011, 17:53

    Sim, existe.
    No modo disigner, evento: Se nenhum dado:

    On Error Resume Next
    MsgBox "Sua Mensagem Personalizada", vbInformation, "Seu Título Personalizado"
    DoCmd.CancelEvent

    Teste aí


    .................................................................................
    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Marcel11
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Empty Re: [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero

    Mensagem  Marcelo David 13/10/2011, 17:55

    Desculpe gilberlanio, postamos juntos (Mas pensamos igual, rs)


    .................................................................................
    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Marcel11
    avatar
    kleyton_mendes
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 182
    Registrado : 28/03/2011

    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Empty Re: [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero

    Mensagem  kleyton_mendes 13/10/2011, 18:02

    Ola Senhores,

    Creio que nao fui muito claro, perdão, o que eu desejo nao é uma msgbox que apareça para a pessoa da ok...

    Eu gostaria que no corpo do relatorio essa txtbox aparece-se.

    Algo como um titulo e o texto abaixo.

    Ex.: Clientes: [txtbox]

    Porém ela só aparece-se nesses casos.

    Não sei se consequi ser compreensivel agora amigos.

    Porém desde já grato
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Empty Re: [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero

    Mensagem  Marcelo David 13/10/2011, 18:10

    Poderia fazer assim:
    Criaria campos não acoplados no relário e definiriam como Invisíveis.(Para não acrecetar dados a tabela)

    Evento ao Formatar (Isso na visualização de impressão)
    If IsNull(Me.SeuCampoRelatório) Then 'Campo do relatório vazio
    Me.SeuCampoRelatório.Visible = False
    Me.SeuCampoNãoAcoplado = True 'Campo criado para aparecer caso o campo do relatório estiver Nulo
    Else
    Me.SeuCampo.Visible = True
    Me.SeuCampoNãoAcoplado = False
    End If




    .................................................................................
    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Marcel11
    avatar
    kleyton_mendes
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 182
    Registrado : 28/03/2011

    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Empty Re: [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero

    Mensagem  kleyton_mendes 13/10/2011, 18:43

    Marcelo

    Obrigado pelo apoio até o momento porém não funfou, apareceu a seguinte mensagem:

    Erro de compliação: Método ou membro de dados não encontrado.

    Veja como formatei o code:
    Private Sub Report_Load()
    If IsNull(Me.ÚltimoDeAcidentedeTrabalho) Then
    Me.ÚltimoDeAcidentedeTrabalho.Visible = False
    Me.Texto279 = True Else
    Me.ÚltimoDeAcidentedeTrabalho.Visible = True
    Me.Texto279 = False
    End If
    End Sub


    Obrigado pelo apoio kleyton
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Empty Re: [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero

    Mensagem  Marcelo David 13/10/2011, 19:23

    1- Renomeie seus campos para nomes sem acentos ou caracteres especiaes.
    2- O evento que deverá por o código em Ao formatar
    3- Observe onde está pondo os campos, pois nos relatórios, detalhe, cabeçalho e rodapé são tratados, digamos que diferentes.
    Feito estas observações e não resolvendo poste aqui seu bd de dados que faço para você.


    .................................................................................
    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Marcel11
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Empty Re: [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero

    Mensagem  vieirasoft 24/10/2011, 11:21

    Como não houve retorno, o tópico passa a resolvido. Qualquer coisa reabra, por favor.

    Conteúdo patrocinado


    [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero Empty Re: [Resolvido]exibir mensagem no relatorio em caso de valor vazio ou zero

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 21/11/2024, 18:01