MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [resolvido]Dúvida referente Atualização de Ribbon em execução Access 2016

    Compartilhe

    vsusincxs
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 23/08/2018

    [resolvido]Dúvida referente Atualização de Ribbon em execução Access 2016

    Mensagem  vsusincxs em 17/9/2018, 21:17

    Olá, sou amador e estou fazendo um sistema de controle interno aqui na empresa, porém quero fazer um ribbon personalizado e com permissões.
    Tentei pegar o exemplo do Avelino "RibbonGetVisible", porém está ocorrendo erro. No BD do Avelino funciona perfeito, porém quando adapto ao meu BD ele informa erro:

    "Não pode executar a macro ou função de retorno de chamada "fncRibbon"
    "Verifique se a macro ou a função existe e se possui os parâmetros corretos"

    Mas conferi os módulos e está igual, a princípio tudo correto.

    O mesmo ocorre na "fncgetVisible"

    Public Sub fncGetVisible(control As IRibbonControl, ByRef visible)
    On Error GoTo fError
    Select Case control.id 'can be the control.tag
       Case "btn_cliente"
           visible = False
       Case Else
           visible = True
    End Select
    fError_Exit:
       Exit Sub
    fError:
       MsgBox "Error: " & Err.Number & vbCrLf & Err.Description, vbCritical, "Warning", Err.HelpFile, Err.HelpContext
       Resume fError_Exit:
    End Sub



    Este é um teste que estou fazendo, mas a intenção é fazer um login e dependendo do usuário eu tornar o botão visível ou não.
    Alguma dica? Pode ser Problema de versão?


    Última edição por vsusincxs em 17/9/2018, 22:05, editado 1 vez(es)

    vsusincxs
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 23/08/2018

    Re: [resolvido]Dúvida referente Atualização de Ribbon em execução Access 2016

    Mensagem  vsusincxs em 17/9/2018, 22:04

    Continuei minhas pesquisas e encontrei o erro,

    não tinha Habilitado a Referência Microsoft Office 16.0 Object Library

    Só foi Habilitar funcionou o exemplo adaptado.

      Data/hora atual: 11/12/2018, 11:47