2016-08-28 2 views
0

Question1: Не удается отключить эти клавиши клавиатуры с помощью Application.Onkey, клавиши {} [] Предложения?Отключить клавиатурные клавиши, используя Application.OnKey

+1

Вы можете рассмотреть вопрос о создании файла только для чтения, а и попросить редактирование пароля: https://support.office.com/en-us/article/Make-a-document-read-only-5c25909c-46d9-4eb0-9d1f-d072a560e340 ** Любые ** попытки добавить безопасность с помощью VBA могут легко сбой, если люди не разрешают макросы. Также обратите внимание, что любой файл Excel можно легко реплицировать, создав новый пустой файл Excel и добавив формулу '= [YourExcelFile.xlsx] Sheet1! A1', а затем скопировав эту формулу поверх вновь созданного листа. – Ralph

+0

Прочтите это [Сообщение для перекрестных плакатов] (http://www.excelguru.ca/content.php?184). – teylyn

ответ

0

Пожалуйста, попробуйте следующее: отключить клавиши {}[]

' Macro to turn off keyboard entry. 

    Sub KeyboardOff() 
    Application.OnKey "{[}", "" 
    Application.OnKey "+{{}", "" 
    Application.OnKey "+{}}", "" 
    Application.OnKey "{]}", "" 
End Sub 

Включение этих вход добавить следующее:

' Macro to turn on keyboard entry. 
Sub KeyboardOn() 
    Application.OnKey "{[}" 
    Application.OnKey "+{{}" 
    Application.OnKey "+{}}" 
    Application.OnKey "{]}" 
End Sub 
Смежные вопросы