Форум программистов, компьютерный форум, киберфорум
Наши страницы
VBA
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
Vagur
0 / 0 / 0
Регистрация: 17.12.2015
1

После активации листа курсор автоматически установить на первую незащищенную ячейку

29.07.2010, 15:59. Просмотров 1096. Ответов 5
Метки нет (Все метки)

Доброго времени суток !

Вопрос такого плана: есть листы с включеной защитой, на листах ячейки, защита которых включаеться в зависимости от даты. Требуеться, чтобы, после активации листа курсор автоматически становился на первую незащищенную ячейку. Как это сделать ?

С уважением ...
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
29.07.2010, 15:59
Ответы с готовыми решениями:

Как скопировать ячейку с неактивного листа без его активации?
Как скопировать ячейку с неактивного листа активной рабочей книги. Не активируя...

Установить курсор в ту же ячейку что и на листе N
Люди добрые помогите. Пол дня бился безуспешно: Sheets("В.2").Select ...

Установить кодом в ячейку функцию листа
Здравствуйте! Будьте любезны, знатоки, подскажите, как в ячейку установить...

Разбить строку, введённую в первую ячейку первого столбца активного листа, на слова
Задали следующее задание: 1я часть: Разбить строку, введённую в первую ячейку...

Разбить строку, введённую в первую ячейку первого столбца активного листа, на слова
Общая часть задания Разбить строку, введённую в первую ячейку первого столбца...

5
vlth
12 / 12 / 2
Регистрация: 23.03.2010
Сообщений: 635
29.07.2010, 16:26 2
Visual Basic
1
2
3
4
5
6
Private Sub Worksheet_Activate()
Dim cl As Range
For Each cl In ActiveSheet.Cells
    If Not cl.Locked Then cl.Select: Exit For
Next cl
End Sub
0
Serg61
0 / 0 / 0
Регистрация: 31.01.2008
Сообщений: 72
29.07.2010, 16:30 3
cells(1,1).select
SendKeys '{TAB}'
0
Vagur
0 / 0 / 0
Регистрация: 17.12.2015
29.07.2010, 16:50 4
Это то, что надо. Спасибо за оба варианта.
0
vlth
12 / 12 / 2
Регистрация: 23.03.2010
Сообщений: 635
29.07.2010, 16:51 5
2Serg61:
Если ячейка 'A1' не защищена, то будет выделена другая незащищённая
ячейка, т.е. вторая. Вероятность невелика, но всё же...
0
vlth
12 / 12 / 2
Регистрация: 23.03.2010
Сообщений: 635
29.07.2010, 20:05 6
Т.е. при исп варианта 2 надо осущ. проверку на защищённость ячейки 'A1':

cells(1,1).select
If selection.Locked Then SendKeys '{TAB}'
0
29.07.2010, 20:05
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
29.07.2010, 20:05

Разбить строку, введённую в первую ячейку первого столбца активного листа, на слова
Помогите-помогите! Пожалуйста.... Нужно разбить строку, введённую в первую...

Установить курсор в ячейку так, как если было бы нажато сочетание клавиш Ctrl+Home
Господа программисты, хелп плиз В приложенном файле, при нажатии ctrl+home...

В форме при активации курсор посредине, убрал курсор с формы она должна закрыться
Здравствуйте, чем вспоминать дни прошедшие..., есть форма, (она из Ворда), по...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru