Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 11.08.2015, 12:28   #1
Bezdar
Форумчанин
 
Регистрация: 03.06.2008
Сообщений: 213
По умолчанию Объединенные ячейки. Locked ругается

Здравствуйте, уважаемые профи!
Никак программно не получается снять защиту с объединенной ячейки, если конкретно не указывать диапазон этого объединения.
Подскажите, может есть какое решение?
Bezdar вне форума Ответить с цитированием
Старый 11.08.2015, 13:17   #2
vefer
Форумчанин
 
Регистрация: 11.10.2010
Сообщений: 134
По умолчанию

как вариант Select первая ячейка в объединенном диапазоне, потом Selection.Locked = False
ну или так:
Код:
ma = Cells(ячейка в объединенном диапазоне).MergeArea.Address
Range(ma).Locked = False

Последний раз редактировалось vefer; 11.08.2015 в 13:27.
vefer вне форума Ответить с цитированием
Старый 11.08.2015, 15:37   #3
Bezdar
Форумчанин
 
Регистрация: 03.06.2008
Сообщений: 213
По умолчанию

Ни так, ни так не канает. Из сил уже выбилась, хотя всегда использовала selection.locked и все было нормально.
Bezdar вне форума Ответить с цитированием
Старый 11.08.2015, 17:26   #4
vefer
Форумчанин
 
Регистрация: 11.10.2010
Сообщений: 134
По умолчанию

а что надо то конкретно? А то гадать долго можно
vefer вне форума Ответить с цитированием
Старый 11.08.2015, 17:30   #5
Bezdar
Форумчанин
 
Регистрация: 03.06.2008
Сообщений: 213
По умолчанию

программно снять защиту с объединенной ячейки
Bezdar вне форума Ответить с цитированием
Старый 11.08.2015, 19:23   #6
Казанский
Старожил
 
Аватар для Казанский
 
Регистрация: 31.12.2010
Сообщений: 2,133
По умолчанию

Цитата:
Сообщение от Bezdar Посмотреть сообщение
если конкретно не указывать диапазон этого объединения
А кто мешает указать?
Код:
myCell.mergearea.locked=false
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
Казанский вне форума Ответить с цитированием
Старый 12.08.2015, 11:40   #7
vefer
Форумчанин
 
Регистрация: 11.10.2010
Сообщений: 134
По умолчанию

Цитата:
Сообщение от Bezdar Посмотреть сообщение
программно снять защиту с объединенной ячейки
Как я понял: на защищенном листе есть некий объединенный диапазон в произвольном месте и с него надо снять защиту, не указывая конкретно ячейку в этом диапазоне, так как она неизвестна, верно?
vefer вне форума Ответить с цитированием
Старый 12.08.2015, 11:50   #8
Bezdar
Форумчанин
 
Регистрация: 03.06.2008
Сообщений: 213
По умолчанию

А если надо разблокировать и объединенные, и не объединенные ячейки? Чего-то не соображу никак.

Последний раз редактировалось Bezdar; 12.08.2015 в 11:54.
Bezdar вне форума Ответить с цитированием
Старый 12.08.2015, 12:12   #9
Bezdar
Форумчанин
 
Регистрация: 03.06.2008
Сообщений: 213
По умолчанию

Все, поняла свою ошибку!
Спасибо всем откликнувшимся!
Bezdar вне форума Ответить с цитированием
Старый 12.08.2015, 12:12   #10
Казанский
Старожил
 
Аватар для Казанский
 
Регистрация: 31.12.2010
Сообщений: 2,133
По умолчанию

Можно циклом по ячейкам
Код:
for each c in MyRange.cells
  c.mergearea.locked=false
next
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
Казанский вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вставка изображений в объединенные ячейки maragva Microsoft Office Excel 1 03.04.2014 20:20
объединенные ячейки и фильтры офис 2007 Piter Pen Microsoft Office Excel 2 31.01.2011 11:32
Выделение столбца, включающего объединенные ячейки jimmyyong Microsoft Office Excel 1 18.11.2010 01:46
Как определить, что есть объединенные ячейки Solyarka Microsoft Office Word 9 26.12.2009 07:42
Locked (кнопка) (VBA) warshadow Microsoft Office Excel 3 12.12.2009 15:24