Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Кто подскажет как вставить строки через inputbox / 5 сообщений из 5, страница 1 из 1
31.01.2011, 17:26
    #37088976
Кто подскажет как вставить строки через inputbox
Подскажите есть ли решение?
Необходимо вставить количество строк на лист через функцию InputBox
т.е. Запускается макрос и на определенном событии открывается окно inputbox, вводим нужное нам число, и соответственно вставляется такое-то кол-во строк.
Спасибо заранее
...
Рейтинг: 0 / 0
31.01.2011, 17:31
    #37088989
Игорь Горбонос
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кто подскажет как вставить строки через inputbox
> Автор: Константин Сочи
> Подскажите есть ли решение?


Есть.
Как вариант:
Код: plaintext
Rows("23:" & CStr( 23 +число_введённое_в_InputBox)).Insert Shift:=xlDown


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
31.01.2011, 17:35
    #37088994
big-duke
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кто подскажет как вставить строки через inputbox
Игорь Горбонос,

и для красоты еще добавить OnKey на Insert.
...
Рейтинг: 0 / 0
01.02.2011, 10:51
    #37089963
Кто подскажет как вставить строки через inputbox
Спасибо
...
Рейтинг: 0 / 0
01.02.2011, 15:14
    #37090949
_slan_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кто подскажет как вставить строки через inputbox
Константин Сочи,

activecell.resize(inputbox..).entirerow.insert
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Кто подскажет как вставить строки через inputbox / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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