Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Добавить пустые строки после вычисляемой строки. / 5 сообщений из 5, страница 1 из 1
30.03.2013, 17:21
    #38205505
1234_5678
1234_5678
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавить пустые строки после вычисляемой строки.
К моменту добавления строк, первый столбец уже содержит не повторяющиеся значения.
Как добавить несколько строк, после строки, которая в первом столбце содержит заданное значение?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.03.2013, 18:08
    #38205545
Казанский
Казанский
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавить пустые строки после вычисляемой строки.
Вроде уже обсуждали это...
Итак: если нет скопированного диапазона ("муравьи" не бегают), то метод Insert вставляет пустой диапазон размера того диапазона, к которому метод применяется, перед тем диапазоном.
Если есть скопированный диапазон, то метод Insert заполняет вставленный диапазон из скопированного (они не обязаны совпадать по размеру, например, можно заполнить несколько строк содержимым одной скопированной ячейки).
Код: vbnet
1.
2.
3.
4.
5.
6.
Application.CutCopyMode = False 'выйти из режима копирования диапазонов
Rows(r + 1).Resize(n).Insert    'вставить n пустых строк после строки номер r
'или
Rows(r).Copy                    'скопировать строку номер r
Rows(r + 1).Resize(n).Insert    'скопировать со вставкой строку номер r
                                'в n строк после строки номер r

Вместо Application ставьте переменную, которая ссылается на объект Excel.Application.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.03.2013, 22:31
    #38205706
1234_5678
1234_5678
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавить пустые строки после вычисляемой строки.
Казанский...'вставить n пустых строк после строки номер r
Вот! А ка этот самый номер найти? Попробовал так:
Код: vbnet
1.
=ПОИСКПОЗ("Образец";A21:A75;0)

получил некое число 14 - порядковый номер искомой строки в диапазоне . А нет ф-ции, чтобы сразу абсолютный номер строки получить или нужно арифметические вычисления проводить?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.03.2013, 22:36
    #38205711
1234_5678
1234_5678
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавить пустые строки после вычисляемой строки.
Хотя...если задавать диапазон ячеек, начиная с самой первой, то ПОИСКПОЗ вернёт абсолютное значение строки с искомым выражением...
...но как-то это ...не "по пацански"...)))
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.04.2013, 14:40
    #38207180
1234_5678
1234_5678
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавить пустые строки после вычисляемой строки.
А можно как-то не в ячейке листа получить результат работы ф-ции ПОИСКПОЗ, а присвоить его переменной?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Добавить пустые строки после вычисляемой строки. / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 466ms
Закрыть
start [/forum/topic.php?fid=61&tablet=1&tid=2174903]:
 0ms
get settings:
 11ms
get forum list:
 15ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 49ms
get topic data:
 13ms
get forum data:
 3ms
get page messages:
 36ms
get tp. blocked users:
 2ms
others: 329ms
total:  466ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]