Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: Защита ячейки Добавлено: 05.06.09 09:32  

Автор вопроса:  Таня | ICQ: 410031407 
Всем здрасте! Подскажите, как можно решить такую задачу: нужно защитить от шаловливых ручек пользователей определенные ячейки в Excel с помощью VBA, но при этом, чтобы на работу макроса это не влияло, заранее спасибо.

Ответить

  Ответы Всего ответов: 3  

Номер ответа: 1
Автор ответа:
 AngryBadger



Вопросов: 33
Ответов: 245
  Профиль | | #1 Добавлено: 05.06.09 10:29
Предлагаю сделать защиту нужных ячеек ручками: Сервис->Защита->Разрешить изменение диапазонов(тех в которые пользователь может вносить изменения), потм запоролить лист. Если в процессе работы макроса необходимо внесение изменений в запароленые ячейки - в макрос дабавь строчки:
Worksheet(N).unprotect password:= "Bla-Bla" ' в начало макроса
Worksheet(N).protect password:= "Bla-Bla" ' в конец макроса

Ответить

Номер ответа: 2
Автор ответа:
 Arvitaly



ICQ: 301746136 

Вопросов: 28
Ответов: 549
  Web-сайт: okazani.ru
 Профиль | | #2 		Добавлено: 05.06.09 11:01
  1. Private Sub Workbook_Open()
  2.     Cells.Locked = False
  3.     Range("A1").Locked = True
  4.     Sheets(1).Protect DrawingObjects:=False, Contents:=True, Scenarios:=False
  5. End Sub

Ответить

Номер ответа: 3
Автор ответа:
 Таня



ICQ: 410031407 

Вопросов: 11
Ответов: 23
  Профиль | | #3 Добавлено: 05.06.09 13:17
Всем большое спасибо за помощь

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам