Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Автоматическое добавление добавленной строки в имена. - Страница 2 - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 2 из 2«12
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Автоматическое добавление добавленной строки в имена. (Формулы/Formulas)
Автоматическое добавление добавленной строки в имена.
den45444 Дата: Понедельник, 15.08.2016, 19:52 | Сообщение № 21
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 225
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
нужное количество пустых строк ВНУТРИ именованного диапазона

Нееее... это неудобно.
 
Ответить
Сообщение
нужное количество пустых строк ВНУТРИ именованного диапазона

Нееее... это неудобно.

Автор - den45444
Дата добавления - 15.08.2016 в 19:52
Nic70y Дата: Понедельник, 15.08.2016, 20:54 | Сообщение № 22
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3908
Репутация: 827 ±
Замечаний: 0% ±

Excel 2013
Добавляйте строку с помощью выпадающего списка в G1
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("G1")) Is Nothing Then
    i = Range(Cells(1, 7)).Row
    u = Range(Cells(1, 7)).Rows.Count
    Rows(i).Insert Shift:=xlDown ', CopyOrigin:=xlFormatFromLeftOrAbove
    Names(Cells(1, 7).Value).RefersToR1C1 = "='Смета по разделам'!R" & i & ":R" & i + u
End If
End Sub
[/vba]
К сообщению приложен файл: 99.12.xlsm(24Kb)


ЯД(poison) 41001841029809
+7 978 049 98 74 (мтс)


Сообщение отредактировал Nic70y - Понедельник, 15.08.2016, 20:55
 
Ответить
СообщениеДобавляйте строку с помощью выпадающего списка в G1
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("G1")) Is Nothing Then
    i = Range(Cells(1, 7)).Row
    u = Range(Cells(1, 7)).Rows.Count
    Rows(i).Insert Shift:=xlDown ', CopyOrigin:=xlFormatFromLeftOrAbove
    Names(Cells(1, 7).Value).RefersToR1C1 = "='Смета по разделам'!R" & i & ":R" & i + u
End If
End Sub
[/vba]

Автор - Nic70y
Дата добавления - 15.08.2016 в 20:54
den45444 Дата: Понедельник, 15.08.2016, 21:16 | Сообщение № 23
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 225
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Добавляйте строку с помощью выпадающего списка в G1

Благодарю за предложенный вариант, но это не совсем то, т.к. в смете явного разделения нет и таких разделов предостаточно.
 
Ответить
Сообщение
Добавляйте строку с помощью выпадающего списка в G1

Благодарю за предложенный вариант, но это не совсем то, т.к. в смете явного разделения нет и таких разделов предостаточно.

Автор - den45444
Дата добавления - 15.08.2016 в 21:16
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Автоматическое добавление добавленной строки в имена. (Формулы/Formulas)
Страница 2 из 2«12
Поиск:

Яндекс цитирования
© 2010-2017 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!