Guru do Excel e Power BI

Pessoal, boa tarde!

Tenho uma planilha que gera orçamentos para minha empresa e quero compartilhá-la com vendedores externos, porém preciso bloquear a opção de "Salvar Como" para que ele não crie copias, bem como a opção de "Salvar" para que ele não salve alterações na planilha modelo.

Encontrei na internet o código abaixo, mas não consegui botar para funcionar. Caso alguem saiba o que está de errado nele, ou saiba de outro modo de fazer o que eu preciso seria de grande ajuda.

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If SaveAsUI = True Then
Cancel = True
Application.EnableEvents = False
ThisWorkbook.Save
MsgBox "A Opção 'Salvar Como' está desabilitada!"
Application.EnableEvents = True
End If
End Sub

Muito obrigado!

Att,

Daniel

Olá Daniel,

Essa macro apenas transforma um SALVAR COMO em um salvamento normal, mas salva!

Se você quer que não salve, tente a macro abaixo.
Saiba que essa proteção é muito frágil. Quem tem um pouquinho de conhecimento de macros, desarma essa proteção e terá liberdade para salvar.

...porém preciso bloquear a opção de "Salvar Como" para que ele não crie copias, bem como ...

Cuidado pois copias ele pode criar pelo Windows Explorer, sem precisar entrar no Excel.

Jimmy

Boa tarde,

O código que você mandou realmente funciona, mas ainda continuo com um problema.

Eu abro o arquivo modelo (o qual quero fornecer para um terceiro e ele não possa salvar) e coloco o código, então eu não consigo salvar. Dessa forma quando eu abro o arquivo novamente ele não está com o código que coloquei.

Sabe como consigo resolver isso?

Muito obrigado!

Att,

Daniel

Eu abro o arquivo modelo (o qual quero fornecer para um terceiro e ele não possa salvar) e coloco o código, então eu não consigo salvar. Dessa forma quando eu abro o arquivo novamente ele não está com o código que coloquei.

É verdade!!! kkkkkkkkk Você não consegue trancar a gaveta com a chave dentro. Não tinha me tocado disso.

Ponha também a seguinte macro E execute-o momentos antes de salvar e fechar o arquivo. Ele inibe a execução do outro código (somente nessa seção, ao reabrir o arquivo a inibição não existirá mais), logo, conseguirá salvar.

Dê retorno.

Jimmy San Juan

Boa tarde!

As instruções que você me deu acima funcionaram perfeitamente, mas percebi que ficou uma brecha.

O usuário ainda pode conseguir fazer uma cópia da planilha, sabe como podemos travar essa possibilidade também?

Att,

Jimmy em 29/jul/2019 escreveu:Cuidado pois copias ele pode criar pelo Windows Explorer, sem precisar entrar no Excel.

Ai foge da esfera do Excel e cai na do Wndows.

Uma opção é você colocar dentro da macro uma verificação se a macro está executando no HD em que a macro espera. Se não estiver, emite uma mensagem e aborta a execução.

O problema é que se o usuário trocar o HD da máquina, a macro deve ser readaptada para o número do HD novo.

Jimmy San Juan