Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #57 da revista programar. Faz já o download aqui!

jnabais

Excel Suplementos

Mensagens Recomendadas

jnabais    0
jnabais

Boa noite.

Como posso fazer para evitar que as minhas folhas Excel.xls não sejam "contaminadas" com uma folha excel.xla (suplementos)?

Obrigado

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
jpaulino    106
jpaulino

Como assim ?

Podias tentar criar um addins (suplemento) que desabilitasse a opção de adicionar addins, mas não sei se funciona.

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
paulosemblano    0
paulosemblano

Obs.: Faça alguns testes antes de usar, pois ainda não apliquei esse código.

Se for para desabilitar Suplementos:

Em EstaPasta_de_trabalho:

Private Sub Workbook_Activate()

Application.OnKey "^b", "MENSAGEM"

With Application.CommandBars("Tools")

    .FindControl(ID:=943).Enabled = False

End With

End Sub

Private Sub Workbook_Deactivate()

With Application.CommandBars("Tools")

    .FindControl(ID:=943).Enabled = True

End With

End Sub

Em um Módulo:

Sub MENSAGEM()

Application.EnableCancelKey = xlDisabled

End Sub

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
jnabais    0
jnabais

Boa noite

Fiz conforme explicação mas não desabilita...

Aquilo que eu pretendo é na prática o seguinte:

Eu tenho um documento em Excel (com macros editadas). E queria que esse documento ficasse imune a Macros provindas de um ficheiro suplementos do Excel.

Obrigado

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora


×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade