Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Защита ячейки с выпадающим списком от вставки данных. - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Защита ячейки с выпадающим списком от вставки данных. (Макросы Sub)
Защита ячейки с выпадающим списком от вставки данных.
Rioran Дата: Суббота, 08.03.2014, 02:14 | Сообщение № 1
Группа: Авторы
Ранг: Ветеран
Сообщений: 903
Репутация: 290 ±
Замечаний: 0% ±

Excel 2013
Уважаемые форумчане, здравствуйте.

Хотел порадовать своих коллег мини-игрушкой в Excel, устроить интеллектуальный отдых. Образец игры прилагаю. Суть игры - за наименьшее количество действий выполнить условия выигрыша, меняя значения 2-х ячеек. Нашёлся игрок, который схитрил - и в целевые ячейки вставил скопированные из другого файла значения. Ещё один игрок открыл диспетчер имён... Если против второго я уже принял меры, то первый ещё представляет угрозу следующим модификациям игры.

Подскажите, пожалуйста, как можно защитить эти две целевые ячейки? Чтобы работали выпадающие списки - ячейки должны оставаться незащищёнными. Полагаю, что существует решение на языке VBA.

В игру можно поиграть, а если интересно, как она устроена - вот пароль от любой защиты:



P.S. Мнение об игре, советы и предложения, выходящие за рамки темы, можете отправить личным сообщением.

Заранее спасибо.
К сообщению приложен файл: Choice_Game_1.0.xlsm (85.5 Kb)


Сообщение отредактировал Rioran - Суббота, 08.03.2014, 02:15
 
Ответить
СообщениеУважаемые форумчане, здравствуйте.

Хотел порадовать своих коллег мини-игрушкой в Excel, устроить интеллектуальный отдых. Образец игры прилагаю. Суть игры - за наименьшее количество действий выполнить условия выигрыша, меняя значения 2-х ячеек. Нашёлся игрок, который схитрил - и в целевые ячейки вставил скопированные из другого файла значения. Ещё один игрок открыл диспетчер имён... Если против второго я уже принял меры, то первый ещё представляет угрозу следующим модификациям игры.

Подскажите, пожалуйста, как можно защитить эти две целевые ячейки? Чтобы работали выпадающие списки - ячейки должны оставаться незащищёнными. Полагаю, что существует решение на языке VBA.

В игру можно поиграть, а если интересно, как она устроена - вот пароль от любой защиты:



P.S. Мнение об игре, советы и предложения, выходящие за рамки темы, можете отправить личным сообщением.

Заранее спасибо.

Автор - Rioran
Дата добавления - 08.03.2014 в 02:14
Stormy Дата: Суббота, 08.03.2014, 10:22 | Сообщение № 2
Группа: Проверенные
Ранг: Обитатель
Сообщений: 357
Репутация: 12 ±
Замечаний: 0% ±

Excel 2010
Ошибка сети выдается при попытке скачивания файла.
Насколько понял по описанию проблемы, то наверное при срабатывание макроса снимать пароль с листа, вставлять значения и опять ставить пароль.


Место для рекламы.

Сообщение отредактировал Stormy - Суббота, 08.03.2014, 10:30
 
Ответить
СообщениеОшибка сети выдается при попытке скачивания файла.
Насколько понял по описанию проблемы, то наверное при срабатывание макроса снимать пароль с листа, вставлять значения и опять ставить пароль.

Автор - Stormy
Дата добавления - 08.03.2014 в 10:22
tsap Дата: Суббота, 08.03.2014, 22:44 | Сообщение № 3
Группа: Проверенные
Ранг: Участник
Сообщений: 60
Репутация: 6 ±
Замечаний: 0% ±

2013
Макрос, который скрывает имена в диспетчере. P.S. Макросы должны быть включены
Пардоньте, по-моему не правильно понял вопрос :)
К сообщению приложен файл: Rioran.xls (32.5 Kb)




Сообщение отредактировал tsap - Воскресенье, 09.03.2014, 00:02
 
Ответить
СообщениеМакрос, который скрывает имена в диспетчере. P.S. Макросы должны быть включены
Пардоньте, по-моему не правильно понял вопрос :)

Автор - tsap
Дата добавления - 08.03.2014 в 22:44
Rioran Дата: Воскресенье, 09.03.2014, 21:22 | Сообщение № 4
Группа: Авторы
Ранг: Ветеран
Сообщений: 903
Репутация: 290 ±
Замечаний: 0% ±

Excel 2013
Tsap, спасибо за Ваш вариант скрытия имён. Он интересен тем, что тайное делает явным и наоборот.

Мой же, уже встроенный в файл, работает только в одну калитку:

[vba]
Код
Sub nam()

      Dim nm As Name
      For Each nm In ThisWorkbook.Names: nm.Visible = False: Next
        
End Sub
[/vba]

Stormy, к сожалению не смог реализовать Вашу идею, так как не хватает знаний как можно закрепить макрос за событием "выбор из раскрывающегося списка".

***********

Добавлено 09.03.14 в 22:01:

Попробовал записать выбор значения из раскрывающегося списка на макрорекодере, но он записывает только выделение ячейки. Хм, к каким объектам и как можно обращаться, если нужно изменить значение раскрывающегося списка макросом?


Роман, Москва, voronov_rv@mail.ru
Яндекс-Деньги: 41001312674279


Сообщение отредактировал Rioran - Воскресенье, 09.03.2014, 22:03
 
Ответить
СообщениеTsap, спасибо за Ваш вариант скрытия имён. Он интересен тем, что тайное делает явным и наоборот.

Мой же, уже встроенный в файл, работает только в одну калитку:

[vba]
Код
Sub nam()

      Dim nm As Name
      For Each nm In ThisWorkbook.Names: nm.Visible = False: Next
        
End Sub
[/vba]

Stormy, к сожалению не смог реализовать Вашу идею, так как не хватает знаний как можно закрепить макрос за событием "выбор из раскрывающегося списка".

***********

Добавлено 09.03.14 в 22:01:

Попробовал записать выбор значения из раскрывающегося списка на макрорекодере, но он записывает только выделение ячейки. Хм, к каким объектам и как можно обращаться, если нужно изменить значение раскрывающегося списка макросом?

Автор - Rioran
Дата добавления - 09.03.2014 в 21:22
Serge_007 Дата: Воскресенье, 09.03.2014, 23:01 | Сообщение № 5
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
как можно защитить эти две целевые ячейки?
Полностью - никак

Мой совет - используйте ComboBox'ы
Они и от копирования защищены и на защищенном листе работают


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
как можно защитить эти две целевые ячейки?
Полностью - никак

Мой совет - используйте ComboBox'ы
Они и от копирования защищены и на защищенном листе работают

Автор - Serge_007
Дата добавления - 09.03.2014 в 23:01
Rioran Дата: Понедельник, 10.03.2014, 01:56 | Сообщение № 6
Группа: Авторы
Ранг: Ветеран
Сообщений: 903
Репутация: 290 ±
Замечаний: 0% ±

Excel 2013
Serge_007, спасибо за ценную идею. Приспособил для своих нужд и получил продвинутую версию игры (во вложении, пароль прежний).

Прихожу к выводу, что при создании развлекательных файлов такого рода лучше давать игроку только кнопки и др. формы, отрезая напрочь доступ к беззащитным ячейкам.

Спасибо всем за участие.

Надеюсь, теперь мои коллеги будут вынуждены играть честно =)
К сообщению приложен файл: Choice_Game_1.1.xlsm (89.2 Kb)


Роман, Москва, voronov_rv@mail.ru
Яндекс-Деньги: 41001312674279
 
Ответить
СообщениеSerge_007, спасибо за ценную идею. Приспособил для своих нужд и получил продвинутую версию игры (во вложении, пароль прежний).

Прихожу к выводу, что при создании развлекательных файлов такого рода лучше давать игроку только кнопки и др. формы, отрезая напрочь доступ к беззащитным ячейкам.

Спасибо всем за участие.

Надеюсь, теперь мои коллеги будут вынуждены играть честно =)

Автор - Rioran
Дата добавления - 10.03.2014 в 01:56
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Защита ячейки с выпадающим списком от вставки данных. (Макросы Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!