|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
20.11.2010, 20:07 | #1 |
Регистрация: 20.11.2010
Сообщений: 7
|
Поиск второй подряд пустой ячейки...
Необходимо в определенном столбце, чтобы активная ячейка при переходе на следующую строчку ниже, при нахождении второй пустой ячейки подряд, переходила на определенный интервал этого же столбца. К примеру, есть столбец I, в интервале столбца от 1 до 13 строк нужно макросу дать понять что со второй подряд пустой активной ячейкой она переносится на I15, в интервале от 15 до 26 строки активная ячейка переносится на I27 и т.д. Как такое сделать ?
|
20.11.2010, 22:56 | #2 | |
Старожил
Регистрация: 15.05.2008
Сообщений: 2,058
|
Цитата:
Или так весь столбец проверять?
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499 |
|
20.11.2010, 23:28 | #3 |
Форумчанин
Регистрация: 07.03.2010
Сообщений: 796
|
Код:
в модуль листа R Dmitry
Логика?!.... она где то рядом... E_mail: dg_rusak@mail.ru Если спасибо мало: Яндекс . Деньги - 41001731366021 WM R269866874234
|
20.11.2010, 23:46 | #4 | |
Регистрация: 20.11.2010
Сообщений: 7
|
Цитата:
Объясню для чего я все это хочу ... строчки в столбце будут заполнятся числами вручную ... и бывает так что в интервале столбца 1-го и 2-го числа (I2:I13), в интервале 2-го и 3-го, 3-го и 4-го числа и т.д. не все строчки заполняются числами, остаются пустые ячейки. И чтобы быстро переходить с одного интервала (I2:I13) на второй (I15:I26), со второй на третий и так по порядку хочу найти макрос который работал по какому-то критерию - в данном случае у меня идея с активной ячейкой, которая заполняет пустую строчку в столбце числом (т.е. человек заполняет), переходит на другую ячейку вниз, находит снова пустую ячейку, и если не заполнив ее числом и перейдя снова вниз на еще одну строчку и найдя там пустую ячейку, переходит на другой интервал. Как такое реализовать ? Последний раз редактировалось Inventor_S; 21.11.2010 в 00:27. |
|
21.11.2010, 00:00 | #5 |
Форумчанин
Регистрация: 07.03.2010
Сообщений: 796
|
а интервал всегда одинаковый?
Логика?!.... она где то рядом... E_mail: dg_rusak@mail.ru Если спасибо мало: Яндекс . Деньги - 41001731366021 WM R269866874234
|
21.11.2010, 00:05 | #6 |
Регистрация: 20.11.2010
Сообщений: 7
|
да, одинаковый, такой как в примере...
|
21.11.2010, 00:11 | #7 |
Форумчанин
Регистрация: 07.03.2010
Сообщений: 796
|
сделаю завтра, сегодня занят
Dim a As Byte Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim r&, lr&, c As Byte If Target.Column <> 9 Then a = 0: Exit Sub lr = Target.Row If lr < 14 Then r = 14 ElseIf lr < 27 Then: r = 27 ElseIf lr < 40 Then r = 40 Else: r = 2 End If If Cells(lr - 1, 9).Value = 0 Then c = 1 a = a + c If a > 1 Then Cells(r, 9).Activate: a = 0 Else a = 0 End If End Sub завтра подумаю над диапазонами
Логика?!.... она где то рядом... E_mail: dg_rusak@mail.ru Если спасибо мало: Яндекс . Деньги - 41001731366021 WM R269866874234
Последний раз редактировалось R Dmitry; 21.11.2010 в 00:22. |
21.11.2010, 00:13 | #8 |
Регистрация: 20.11.2010
Сообщений: 7
|
ok, спасибо за помощь, земляк буду ждать результата ...
|
21.11.2010, 01:21 | #9 |
Форумчанин
Регистрация: 06.08.2009
Сообщений: 472
|
можно сделать, например, так, см. вложение
|
21.11.2010, 01:41 | #10 |
Регистрация: 20.11.2010
Сообщений: 7
|
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Поиск первой пустой ячейки в столбце | Verano naranjo | Microsoft Office Excel | 3 | 12.11.2010 13:47 |
Проверка пустой ячейки в DGV | coper | Общие вопросы .NET | 2 | 11.08.2010 05:49 |
перенос строки с пустой ячейки | HospodySave | Microsoft Office Excel | 10 | 24.06.2010 07:16 |
удаление строки, начинающейся с пустой ячейки | grichanuk | Microsoft Office Excel | 3 | 01.12.2009 05:31 |
Сборная России по хоккею стала чемпионом мира второй год подряд | rpy3uH | Свободное общение | 13 | 25.05.2009 02:23 |