Страницы: 1
RSS
Запрет на редактирование формулы в отдельной ячейке
 
Подскажите пожалуйста, каким образом можно запретить пользователям возможность изменения формулы забитой в отдельную ячейку? Т.к после очистки старых данных, они по запарке удаляют и формулу.
 
{quote}{login=doc}{date=23.01.2008 10:36}{thema=Запрет на редактирование формулы в отдельной ячейке}{post}Подскажите пожалуйста, каким образом можно запретить пользователям возможность изменения формулы забитой в отдельную ячейку? Т.к после очистки старых данных, они по запарке удаляют и формулу.{/post}{/quote}  
 
Если Вы готовы пожертвовать некоторыми другими функциональностями работы с листом, то можно сделать так:  
- выделить все ячейки листа  
- Ctrl+1 (Формат ячеек)    
- Вкладка - Защита  
- снять флажок - защищаемая ячейка - ОК  
- выделить нужные ячейки с формулами, которые нужно защитить  
- снова Ctrl+1 - Защита - поставить флажок - защищаемая ячейка  
- Меню-Сервис-Защита-Защитить лист    
 
После этого при включенной защите листа защещенными будут ячейки с включенной защитой. Остальные можно будет редактировать.
 
или макросом..
 
да я не сильно силён в макросах
 
ужЕ неплохо - слабо сильны - это вам не совсем не сильны :)  
 
прописать в коде книги такую программку:  
 
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)  
  Dim forbidden As Range  
  Set forbidden = Union(Range("a1:d6"), Range("e5:e6"), Range("d7:d9"))' - здесь прописать защищаемые диапазоны  
  If Intersect(Target, forbidden) Is Nothing Then Exit Sub  
  Application.EnableEvents = False  
     
  Range("e7").Select ' эта строчка как раз и не дает выделить защищаемый диапазон  
  Application.EnableEvents = true  
 
End Sub
 
А не подскажете, как запретить редактирование конкретной ячейки с возможностью выделения, но без возможности редактирования макросом?
 
а зачем выделять? для копирования?
 
Да, для копирования.
 
Проще всего подставлять предыдущее значение ячейки, но я пока так не умею. Не подскажите, как написать?
 
О, это вроде через SelectionChange делается...
 
Крутизна...
Страницы: 1
Наверх