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


    [Resolvido]Logotipo em relatório

    LuisFernandes
    LuisFernandes
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7
    Registrado : 05/02/2024

    [Resolvido]Logotipo em relatório Empty [Resolvido]Logotipo em relatório

    Mensagem  LuisFernandes 18/2/2024, 01:05

    Boa noite a todos,

    Tenho um problema, tenho uma tabela com os dados da entidade assim como o seu formulário.
    Consegui configurar o formulário como o logo e o caminho do logo.
    Agora quero, que em todos os relatórios apareça o logo em todos os relatório vindo do formulário da entidade (se num futuro a entidade mudar de logo o sistema fique atualizado).
    Nota: a tabela e formulário é independente de todos os outros.
    Pergunto como posso resolver o problema?
    Desde já agradeço toda a atenção dispensada.
    Cumps.
    LuisFernandes
    LuisFernandes
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7
    Registrado : 05/02/2024

    [Resolvido]Logotipo em relatório Empty Re: [Resolvido]Logotipo em relatório

    Mensagem  LuisFernandes 19/2/2024, 22:18

    Boa noite a todos,

    Após dar "n" voltas cheguei a resultado desejado.
    Como se diz que as coisas mais simples (em muitos casos) são mais eficazes não se está longe da verdade.
    Foi o que aconteceu neste caso.

    Em cabeçalho do relatório na opção ao imprimir inserir o seguinte código:

    Private Sub SecçãoDeCabeçalhoDePágina_Print(Cancel As Integer, PrintCount As Integer)
    On Error Resume Next
    Me.img_LogoEnt.Picture = Application.CurrentProject.Path & "\Imagens\505 131 986.png"
    End Sub

    Assim, quando se inserir novo logotipo na entidade todos os cabeçalhos serão alterados (testes efetuados).

    Desde já agradeço todas as ditas espalhadas pelo fórum.
    Cumps.

      Data/hora atual: 8/5/2024, 23:22