Переход в ячейку при условии

Страница 1 из 1 1
Модератор форума: китин, _Boroda_, DrMini

Переход в ячейку при условии (Макросы/Sub)

VIDEO56

Дата: Четверг, 23.07.2015, 14:54 | Сообщение № 1

Группа: Проверенные

Ранг: Обитатель

Сообщений: 262

Репутация: 27 ±

Замечаний: 0% ±

Excel 2010

Еще раз всех приветствую.
Подскажите код макроса.
Задача в следующем: а столбе А вводится значение "х", так как таблица около 150 столбцов нужно, чтобы при вводе значения в столбец А курсор сразу перемещался на ячейку ВВ.
Пример думаю не обязателен.
Заранее спасибо

Всем удачного дня!

Ответить

KSV

Дата: Четверг, 23.07.2015, 15:21 | Сообщение № 2

Группа: Друзья

Ранг: Ветеран

Сообщений: 770

Репутация: 255 ±

Замечаний: 0% ±

Excel 2013

Можно так

К сообщению приложен файл: BB.xlsm (12.1 Kb)

KSV.VBA@gmail.com
Яндекс.Деньги: 410011921213333

Ответить

Udik

Дата: Четверг, 23.07.2015, 15:26 | Сообщение № 3

Группа: Друзья

Ранг: Старожил

Сообщений: 1588

Репутация: 192 ±

Замечаний: 0% ±

Excel 2016 х 64

не нужен макрос, достаточно ввести конечный адрес в соответствующее поле(на картинках там где А1 превратилось в ВК2) и нажать ввод
[p.s.]если хочется цифрами вводить - переключиться на режим RC

К сообщению приложен файл: 2389084.jpg (28.9 Kb) · 2149368.jpg (25.0 Kb)

вот вам барабан
яд 41001231307558 wm R419131876897
udik1968@gmail.com

Сообщение отредактировал Udik - Четверг, 23.07.2015, 15:32

Ответить

KSV

Дата: Четверг, 23.07.2015, 15:46 | Сообщение № 4

Группа: Друзья

Ранг: Ветеран

Сообщений: 770

Репутация: 255 ±

Замечаний: 0% ±

Excel 2013

Udik,

Цитата VIDEO56, 23.07.2015 в 14:54, в сообщении № 1

нужно, чтобы при вводе значения в столбец А курсор сразу перемещался на ячейку ВВ

KSV.VBA@gmail.com
Яндекс.Деньги: 410011921213333

Ответить

VIDEO56

Дата: Четверг, 23.07.2015, 16:00 | Сообщение № 5

Группа: Проверенные

Ранг: Обитатель

Сообщений: 262

Репутация: 27 ±

Замечаний: 0% ±

Excel 2010

KSV, почти. Только вот если я хочу удалить значение из столба А меня опять перекидывает на столб 53!

Всем удачного дня!

Ответить

Roman777

Дата: Четверг, 23.07.2015, 16:07 | Сообщение № 6

Группа: Проверенные

Ранг: Ветеран

Сообщений: 980

Репутация: 127 ±

Замечаний: 0% ±

Excel 2007, Excel 2013

VIDEO56, Макос чётко отрабатывает. Если я удаляю значения, то он не перескакивает. Если вы будете сокращать кол-во символов в ячейке, то естественно значение в ячейке останется - вы вводите данные, просто другие - поэтому перескок.

Много чего не знаю!!!!

Ответить

KSV

Дата: Четверг, 23.07.2015, 16:22 | Сообщение № 7

Группа: Друзья

Ранг: Ветеран

Сообщений: 770

Репутация: 255 ±

Замечаний: 0% ±

Excel 2013

Цитата VIDEO56, 23.07.2015 в 16:00, в сообщении № 5

меня опять перекидывает на столб 53

При удалении - не перекидывает.
Специально для этого там проверка значения ячейки [vba]

Код

Private Sub Worksheet_Change(ByVal Target As Range)
     If Target.Column <> 1 Then Exit Sub
     If Len(Target(1)) Then Target.Offset(, 53).Select
       '^^^^^^^^^ проверка. и переход только если в ячейке столбца А - "НЕ ПУСТО"
End Sub

[/vba]

KSV.VBA@gmail.com
Яндекс.Деньги: 410011921213333

Ответить

VIDEO56

Дата: Четверг, 23.07.2015, 16:23 | Сообщение № 8

Группа: Проверенные

Ранг: Обитатель

Сообщений: 262

Репутация: 27 ±

Замечаний: 0% ±

Excel 2010

Спасибо други! Все в норме!

Всем удачного дня!

Ответить

Переход в ячейку при условии (Макросы/Sub)

Страница 1 из 1
1