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

Вход

Регистрация

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

 

= Мир MS Excel/Как вставить 3 пустые ячейки между ячейками? - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Как вставить 3 пустые ячейки между ячейками? (Формулы/Formulas)
Как вставить 3 пустые ячейки между ячейками?
AdwordsDirect Дата: Вторник, 19.06.2018, 11:31 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 148
Репутация: 0 ±
Замечаний: 0% ±

Excel 2007
Здравствуйте, есть ячейки А1, А2, А3. Как сделать чтобы ячейки автоматически оказались А1 = А1, А2 = А5, А3 = А8 и так до бесконечности?
К сообщению приложен файл: _Microsoft_Offi.xlsx (8.0 Kb)
 
Ответить
СообщениеЗдравствуйте, есть ячейки А1, А2, А3. Как сделать чтобы ячейки автоматически оказались А1 = А1, А2 = А5, А3 = А8 и так до бесконечности?

Автор - AdwordsDirect
Дата добавления - 19.06.2018 в 11:31
sboy Дата: Вторник, 19.06.2018, 11:42 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2566
Репутация: 724 ±
Замечаний: 0% ±

Excel 2010
Добрый день.
вариант макросом
[vba]
Код
Sub vstavka()
    For x = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1
        Rows(x & ":" & x + 2).Insert
    Next
End Sub
[/vba]
К сообщению приложен файл: _Microsoft_Offi.xlsm (13.7 Kb)


Яндекс: 410016850021169

Сообщение отредактировал sboy - Вторник, 19.06.2018, 11:43
 
Ответить
СообщениеДобрый день.
вариант макросом
[vba]
Код
Sub vstavka()
    For x = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1
        Rows(x & ":" & x + 2).Insert
    Next
End Sub
[/vba]

Автор - sboy
Дата добавления - 19.06.2018 в 11:42
_Boroda_ Дата: Вторник, 19.06.2018, 11:45 | Сообщение № 3
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16675
Репутация: 6481 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
Почему 8? вроде 9 должно быть? Не?
В соседнем столбце формулой
Код
=ЕСЛИ(ОСТАТ(СТРОКА()-1;4);"";ИНДЕКС(A$1:A$3;ОСТАТ((СТРОКА()-1)/4;3)+1))
К сообщению приложен файл: 7272231.xlsx (9.3 Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеПочему 8? вроде 9 должно быть? Не?
В соседнем столбце формулой
Код
=ЕСЛИ(ОСТАТ(СТРОКА()-1;4);"";ИНДЕКС(A$1:A$3;ОСТАТ((СТРОКА()-1)/4;3)+1))

Автор - _Boroda_
Дата добавления - 19.06.2018 в 11:45
sboy Дата: Вторник, 19.06.2018, 11:57 | Сообщение № 4
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2566
Репутация: 724 ±
Замечаний: 0% ±

Excel 2010
Похожая формула
Код
=ЕСЛИ(ОСТАТ(СТРОКА();4)=1;ИНДЕКС(A:A;ОКРУГЛВВЕРХ(СТРОКА()/3;));"")
К сообщению приложен файл: 9746434.xlsx (9.0 Kb)


Яндекс: 410016850021169
 
Ответить
СообщениеПохожая формула
Код
=ЕСЛИ(ОСТАТ(СТРОКА();4)=1;ИНДЕКС(A:A;ОКРУГЛВВЕРХ(СТРОКА()/3;));"")

Автор - sboy
Дата добавления - 19.06.2018 в 11:57
AdwordsDirect Дата: Вторник, 19.06.2018, 12:09 | Сообщение № 5
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 148
Репутация: 0 ±
Замечаний: 0% ±

Excel 2007
Sboy, ваша формула понравилась больше, т.к. если протянуть до самого низа. то неактуальные значения просто заменяются нулями, а в версии уважаемого _Boroda_ если тянуть в самый низ будет всегда какая-то ячейка. Благодарен всем. помогли! Лукасы оформлю.

_Boroda_, всё правильно, 9, у меня с математикой туговато :)


Сообщение отредактировал AdwordsDirect - Вторник, 19.06.2018, 12:18
 
Ответить
СообщениеSboy, ваша формула понравилась больше, т.к. если протянуть до самого низа. то неактуальные значения просто заменяются нулями, а в версии уважаемого _Boroda_ если тянуть в самый низ будет всегда какая-то ячейка. Благодарен всем. помогли! Лукасы оформлю.

_Boroda_, всё правильно, 9, у меня с математикой туговато :)

Автор - AdwordsDirect
Дата добавления - 19.06.2018 в 12:09
_Boroda_ Дата: Вторник, 19.06.2018, 12:18 | Сообщение № 6
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16675
Репутация: 6481 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
А это я так понял Вашу задачу - что нужно размножать первые 3 строки до бесконечности вниз через 3 пустых


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеА это я так понял Вашу задачу - что нужно размножать первые 3 строки до бесконечности вниз через 3 пустых

Автор - _Boroda_
Дата добавления - 19.06.2018 в 12:18
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Как вставить 3 пустые ячейки между ячейками? (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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