Habilitar e Desabilitar copy/paste

Pessoal,


Preciso desabilitar a execução de copy/paste pelo usuário numa planilha, porém como tenho macros que fazem copy/paste de linhas para uma aba de histórico, preciso por dentro da macro poder habilitar, executar, e no final da execução voltar a desabilitar.

Para desabilitar, utilizo o código abaixo colocando no "Thisworkbook" e fuinciona. Porém não consegui habilitar por dentro da macro para poder executá-la.

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
  Application.CutCopyMode = False
  Application.CellDragAndDrop = False
End Sub


Conto com a ajuda de vocês.

Obrigado

Miguel Leal

Bom dia!!

Eu não entendi muito bom..

Você precisa evitar a opção copia e colar, mas tem macros que executam essas opções?

Use um comando

Código:

call

para chamar a macro que habilita e doutra que desabilita o copiar e colar.

Código:

Sub Macro_Principal()

call DesabjilitaCopiaCola

'.....sua macro principal

call HabilitaCopiaCola

End sub

Att