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] Atribuir um "FaceId " a um Menu de Atalho

    brunogor
    brunogor
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 273
    Registrado : 24/02/2013

    [Resolvido] Atribuir um "FaceId " a um Menu de Atalho Empty [Resolvido] Atribuir um "FaceId " a um Menu de Atalho

    Mensagem  brunogor 10/1/2023, 14:58

    Caríssimos,

    Conseguem-me ajudar na colocação de um "FaceID" num Menu de Atalho que é construído assim:

    No Módulo Geral
    Código:
    Public Function fncAddSubMenu(menu As CommandBar, Caption As String) As CommandBarPopup
      Dim cbp As CommandBarPopup
      Set cbp = menu.Controls.Add(msoControlPopup)
      cbp.Caption = Caption
      Set fncAddSubMenu = cbp
    End Function


    Na Sub
    Código:
    'Criar sub menu de Atalho
    Set cbp = fncAddSubMenu(cb, "&Zoom")(a, True)

    A ideia é por exemplo o Menu "Zoom" não ficar sem simbolo como esta imagem:
    [Resolvido] Atribuir um "FaceId " a um Menu de Atalho 12345

    Cabe-me informar que a imagem e o código são da autoria de "https://www.usandoaccess.com.br/"
    O meu obrigado pela vossa atenção

    Bruno Gordino


    Última edição por brunogor em 11/1/2023, 11:01, editado 2 vez(es)
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3890
    Registrado : 04/04/2010

    [Resolvido] Atribuir um "FaceId " a um Menu de Atalho Empty Re: [Resolvido] Atribuir um "FaceId " a um Menu de Atalho

    Mensagem  Avelino Sampaio 10/1/2023, 19:03

    Bruno

    Você pode pegar emprestado qualquer imagem dos botões do Access. Por exemplo, um coração(481) para zoom de 25%.

    ...
    Call fncAddBotaoS(cbp, 481, "&25", "=fncZoom(25)")
    ...

    Sucesso!


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    brunogor
    brunogor
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 273
    Registrado : 24/02/2013

    [Resolvido] Atribuir um "FaceId " a um Menu de Atalho Empty Re: [Resolvido] Atribuir um "FaceId " a um Menu de Atalho

    Mensagem  brunogor 11/1/2023, 08:58

    Olá Sr. Avelino,

    A minha questão não se prende com os botões mas sim com a criação do Menu que dá acesso aos botões:
    Código:
    Set cbp = fncAddSubMenu(cb, "&Zoom")

    Obrigado pela sua disponibilidade

    Bruno Gordino
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    [Resolvido] Atribuir um "FaceId " a um Menu de Atalho Empty Re: [Resolvido] Atribuir um "FaceId " a um Menu de Atalho

    Mensagem  DamascenoJr. 6/2/2023, 02:39

    Bruno, somente botões podem receber FaceIDs.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    brunogor
    brunogor
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 273
    Registrado : 24/02/2013

    [Resolvido] Atribuir um "FaceId " a um Menu de Atalho Empty Re: [Resolvido] Atribuir um "FaceId " a um Menu de Atalho

    Mensagem  brunogor 8/2/2023, 10:05

    Bom dia a todos,

    Caríssimo Damasceno, muito obrigado pela sua disponibilidade, mais uma vez.

    Abraço

    Bruno Gordino

    Conteúdo patrocinado


    [Resolvido] Atribuir um "FaceId " a um Menu de Atalho Empty Re: [Resolvido] Atribuir um "FaceId " a um Menu de Atalho

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 16/7/2024, 14:00