Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Добавление чересстрочно пустых строк в таблицу / 4 сообщений из 4, страница 1 из 1
19.06.2011, 23:13
    #37315098
trendus
trendus
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление чересстрочно пустых строк в таблицу
Таблица с заголовком содержит пару сотен заполненых строк.
Нужно к каждой такой строке добавить ниже пустую.
Подскажите, как правильно в коде excel это прописать, а то возникает проблема с последней строкой, нужно, чтобы увеличившийся диапазон таблицы включал и последнюю пустую строчку.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.06.2011, 00:58
    #37315162
Thermik
Thermik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление чересстрочно пустых строк в таблицу
trendus,

Я надстройкой делаю www.icqrobot.ru
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.06.2011, 06:53
    #37315227
trendus
trendus
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление чересстрочно пустых строк в таблицу
Мне нужно дополнить кодом уже существующий проект
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.06.2011, 07:47
    #37315240
SirFisher
SirFisher
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление чересстрочно пустых строк в таблицу
trendus,

неужели нельзя поиск на сайте использовать?

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
   Sub Row_insert()

        Dim r As Long, rwsCount As Long
    
        Range("A1").Select
        rwsCount = ActiveCell.CurrentRegion.Rows.Count
    

        For r = rwsCount To  2  Step - 1 
            Rows(r).Insert Shift:=xlShiftDown
        Next r

   End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Добавление чересстрочно пустых строк в таблицу / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 309ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2176754]:
 0ms
get settings:
 6ms
get forum list:
 12ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 51ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 21ms
get tp. blocked users:
 1ms
others: 204ms
total:  309ms
x
x
Закрыть


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