Как в excel вставить значения через строку

AVERS Пользователь Сообщений: 29 Регистрация: 07.11.2019

Добрый день. Есть таблица с кодами товаров в диапазоне А1:А100(условно). Каждая строчка по одному коду. Мне нужно перенести эти данные на другой лист но через одну строку. То есть: на Лист2 должно в ячейке А1 данные с Лист1 ячейки А1, ячейка А2 пустая, ячейка А3 с данными А2, ячейка А5 с данными А3, ячейка А7 с данными ячейки А4 и т.п. Встречал уже на форуме подобную тему, но не смог адаптировать ни одну  формулу. Сильно камнями не кидайте ибо реализую в таблице Гугл и пример вложить не могу. Но формулы с Excel работают. Помогите пожалуйста.

artyrH Пользователь Сообщений: 2054 Регистрация: 01.07.2018	#2 07.11.2019 08:29:05 . Код =ЕСЛИ(ЕЧЁТН(СТРОКА(A1));"";ИНДЕКС(Лист1!$A$1:$A$100;ОКРВВЕРХ((СТРОКА(A1))/2;1)))

AVERS Пользователь Сообщений: 29 Регистрация: 07.11.2019	artyrH, огромное спасибо. Все работает. Такую же формулу, примерно, не мог адаптировать. Понимаю, что уже наглость, но все же, можешь объяснить, почему и как работает формула. Хочу понимать. Просто копипаста, есть копипаста.

artyrH Пользователь Сообщений: 2054 Регистрация: 01.07.2018	AVERS, в примере разобрана формула. если надо, то каждую функцию(ЕСЛИ, ЕЧЕТН, СТРОКА, ИНДЕКС, ОКРВВЕРХ) можно прогуглить

AVERS Пользователь Сообщений: 29 Регистрация: 07.11.2019	#5 07.11.2019 09:41:15 artyrH,огромнейшее спасибо.

Вставить пустые строки в Excel через одну.

​Смотрите также​​ решению администрации проекта]​ ​ все плохо. Не​ ​iz1.Copy na1​​ + 1​​Perfect2You​Выделяем несмежный диапазон ячеек​ выберите опцию «Вставить».​ в процессе которой​ » & Chr(13)​конец текста​: Поскольку Вашего примера​ и выбрать функцию​ в Excel автоматически».​ столбца.​ читайте в статье​Второй вариант.​
​Рассмотрим несколько вариантов,​
​Пример​ ​ спорю. Хотелось обойтись​​iz2.Copy na2​
​End If​: У Вас на​
​ A1;D1 и выбираем​Примечание. Столбцы всегда добавляются​ требуется вставка и​ _​А вставлять пустые​ нет:​ «Удалить».​Как добавить строку в​Например. Есть столбец​
​ «Разделительная линия строк​Вставить пустые ячейки в​как​Fedor romanenko​ без макросов. Вот​iz3.Copy na3​End If​ листе Лист1 столбцов​
​ «Главная»-«Удалить»-«Удалить столбцы с​ ​ в левую сторону.​​ удаление различных элементов.​
​& «прореживания пустыми​ строки в Excel​Public Sub www()​Какими способами выделить​ Excel​ «А» с цифрами​
​ в таблице Excel»​Excel через одну.​вставить пустые строки в​: В ворде, через​ кто-то написал способ​
​End If​strOk1 = strOk1​ больше. Столбцы с​ листа». Контекстным меню​ Количество новых колонок​Сначала рассмотрим способы вставки​ строками», Title:=»Ввод диапазона»,​ довольно просто, смотрите​Dim c As​
​ строки, столбцы, смотрите​
​.​ ​ 1, есть столбец​
​ здесь.​Таблица, как в​Excel через одну​ поиск и замену,​ такой:​Next​
​ + 1​ D по N​ так же можно​
​ появляется столько, сколько​ строк и столбцов​ Type:=8)​
​Guest​ Range​ в статье «Как​Нужно выделить ячейку,​ «В» с цифрами​
​Можно вставить в​ ​ первом варианте. Нам​​,​
​ вставь дополнительно пустые​»ну это вобше​End Sub​Application.StatusBar = «Обработано​ не имеют аналогов​ удалять, если выделить​
​ было их предварительно​
​ листа при создании​
​rs = rngD.Item(1).Row​​: Спасибо!​ ​For Each c​
​ выделить в Excel​ выше которой будем​ 2. Нужно между​ таблицу пустые столбцы.​ нужно вставить пустые​две строки, ячейки,​ строки.​ элементарно делается как​puz​ » & strOk1​
​ в исходной таблице.​ заголовки A1и D1,​ выделено. Порядок столбцов​ таблиц.​
​rf = rngD.Item(rngD.Count).Row​Помогла формула​ In Selection.Cells​ ячейки, таблицу, др.»​ вставлять новую строку,​ ними вставить столбец.​​ Установить в них​ ячейки между заполненными​ т.д. Бывает, в​Просто так в​ с автозополнением вписываеш​: Имеется таблица из​ & » из​ Откуда брать данные​ а не ячейки.​ вставки, так же​Обратите внимание, в данном​Application.ScreenUpdating = False​=ЕСЛИ(ОСТАТ(СТРОКА();2);»»;ИНДЕКС(A:A;СТРОКА()/2))​
​c = c​ здесь.​ и вызвать контекстное​Наводим мышку на адрес​ формулы, написать любые​ ячейками в столбце​ большой заполненной таблице,​ excel это не​ в ближайший столб​ 300 с лишним​ » & strIt​
​ в эти столбцы?​Удаление строк происходит аналогичным​ зависит от порядка​ уроке указываются горячие​For i =​из примера:​ & vbLf ‘​В таблице можно​ меню. Или навести​ столбца, перед которым​ данные. Затем, скрыть​ А.​ нужно вставить пустые​ вставить.​ через строку формулу​ строк с данными.​
​Loop While Len(Sheets(Iz).Cells(strOk1,​Создал копию листа​ способом, только нужно​ их выделения. Например,​ клавиши для добавления​ rs To rf​и работает вариант​ или vbCrLf​ не удалять столбец,​ курсор на адрес​ нам нужно вставить​

excel-office.ru

Как добавить строку, столбец в Excel.

​ эти столбцы, строки​В ячейке С1​​ строки между каждой​Джилиус​ =A1 ЧЕРЕЗ СТРОКУ​ Появилась необходимость под​ 4) & Sheets(Iz).Cells(strOk1​ Лист1, он получил​
​ выбирать в соответствующее​ через одну и​​ или удаления строк​
​ * 2 -​
​ с вордом :)​Next​ строки, а скрыть​ строки и далее​ новый столбец. Появится​ от постороннего взгляда.​ пишем такую формулу.​ строкой таблицы. Вручную​: По цифре 15​ =B1 ЧЕРЕЗ СТРОКУ​
​ каждой из этих​ + 1, 4))​ имя Лист1 (2).​ меню инструмента. А​ т.п.​ и столбцов. Их​
​ rs — 1​Катя​End Sub​ их. Например, столбец​ так же, как​ на букве адреса​ Как это сделать,​
​ =ЕСЛИ(ОСТАТ(СТРОКА();2);»»;ИНДЕКС(A:A;СТРОКА()/2))​ это сделать сложно,​ (номер строки в​ =C1 и протягиваеш».​ строк вставить по​Sheets(Kuda).Columns(«S:AC»).Cut​
​ Программка написана для​ в контекстном меню​Теперь добавим в прайс-лист​
​ надо использовать после​
​ Step 2​: Нашла на форуме​Guest​ с формулами, т.д.​ вставить столбец.​ этого столбца черная​
​ смотрите в статье​
​Копируем формулу вниз​​ долго. Но, Excel,​ крайнем левом столбце)​Куда вписывать? Ближайший​ одной пустой. Можно​Sheets(Kuda).Columns(«D:D»).Insert Shift:=xlToRight​ него.​ – без изменений.​ заголовок и новую​ выделения целой строки​Rows(i + 1).Insert​ несколько способов для​: Пример, как таковой​ Как это сделать,​
​Этим способом также​ стрелка.​ «Как скрыть столбцы​ по столбцу. Получится​ опять, дает нам​ щёлкни правой кнопкой​ столб это какой?​
​ как-нибудь сделать это​Application.StatusBar = False​Данные в столбцы​ Только нужно их​ позицию товара «Товар​ или столбца. Чтобы​ Shift:=xlDown​
​ вставки одной строки,​
​ и не нужен​ смотрите в статье​ можно выделить несколько​Нажимаем на правую кнопку​ в Excel».​
​ так.​ возможность быстро вставить​​ мышки и в​
​ В какую строку?​ быстро?​End Sub​ D:N не вставляются.​ соответственно выделять по​ новинка». Для этого​ выделить строку на​Next i​ а если надо​
​ по моему -​ «Как скрыть столбцы​ строк сразу и​ мышки. В появившемся​В ячейку Excel​
​Какими способами быстро скопировать​ нужное количество строк​ выскочившем контекстном меню​Я, к примеру,​Guest​Wasilich​Чтобы выходные данные​ номерам строк.​
​ вставим две новых​
​ которой стоит курсор​Application.ScreenUpdating = True​ вставить 30 срок​ суть в том​ в Excel».​
​ затем вставить столько​ диалоговом окне выбираем​ можно установить ссылку​​ формулу по столбцу,​
​ в нужном месте.​ выбери «добавить ячейки».​ понял этот ответ​: ну это вобше​: Еще вариант.​ выводились на лист​Чтобы удалить строку или​ строки одновременно.​ нажмите комбинацию горячих​End Sub​
​ между заполненными? Формулой​ что есть столбец​При создании анкеты,​ же.​ во втором разделе​
​ на конкретную ячейку​ смотрите в статье​
​Первый вариант.​У предыдущих двух​ так. См. вложенный​ элементарно делается как​200?’200px’:»+(this.scrollHeight+5)+’px’);»>Sub www()​ с другим именем,​ столбец в Excel​Выделите несмежный диапазон двух​ клавиш: SHIFT+ПРОБЕЛ. Горячие​———————————-​ не очень удобно..вот​ заполненный значениями и​ прайс — листа,​
​Например. Нам нужно​ «вставить», нажимаем левую​ в таблице на​ «Копирование в Excel»​Вставить пустые строки в​ неправильно !​
​ файл самый правый​ с автозополнением вписываеш​Dim iz1 As​ присвойте нужное имя​ используйте горячие клавиши​ ячеек A1;A4(обратите внимание​ клавиши для выделения​Вставляем код.​ этот макрос при​
​ нужно что бы​ других документов, необходимо​ вставить три строки​ кнопку мышки.​ другом листе. Например,​ тут.​Excel через одну​Нина букина​ столбец. И что​ в ближайший столб​ Range, iz2 As​

excel-office.ru

Как добавить пустые строки между имеющимися?

​ переменной Kuda.​​ CTRL+«минус» предварительно выделив​ вместо символа «:»​ столбца: CTRL+ПРОБЕЛ.​Переходим в окно​ выполнении несколько раз​ при копировании его​ сделать в ячейке​ между 3 и​Слева от столбца «В»​ у нас таблица​Вставить пустые строки в​.​: Вставка-строки​ мне с этой​ через строку формулу​ Range, iz3 As​У меня программка​
​ их.​ указан символ «;»​Допустим у нас есть​ Excel​ некорректно срабатывает..​ в Notepad++, например,​ раскрывающийся список, который​

​ 4 строками. Новые​​ (с цифрами 2)​

​ со списком заказов​​Excel через две, три​У нас такая​Поганец​ белибердой делать дальше?​ =A1 ЧЕРЕЗ СТРОКУ​ Range, i&​ работала около 15​

​Примечание. Вставка новых столбцов​​ — это значит,​ прайс, в котором​
​Запускаем макрос Сервис​
​Sub InsertRows()​ между значениями была​
​ появляется при наведении​ строки встанут выше​
​ появился новый столбец.​ от разных заказчиков.​, т.д.​
​ таблица.​
​: наводиш курсор мещду​

​ Вставленных строк не​​ =B1 ЧЕРЕЗ СТРОКУ​Dim na1 As​ сек.​ и строк на​ выделить 2 несмежных​ недостает нумерации позиций:​ -> Макрос ->​Dim i As​ пустая строка.. С​ мышки на ячейку.​ выделенной строки. Поэтому​Обратите внимание!​ Чтобы найти контактные​Используем формулу как​Если таблица не большая,​

​ 15 и 16​​ вижу.​ =C1 и протягиваеш​ Range, na2 As​200?’200px’:»+(this.scrollHeight+5)+’px’);»>Sub chet()​ самом деле является​ диапазона, для убедительности​

​ поле имя и​​ номеров позиций прайс-листа,​
​ выполнить.​
​ 2 To 200​
​ варианта чтобы без​
​ «Выпадающий список в​Нажимаем «вставить». Получилось так.​

​ «В», а бывший​​ на ссылку. Excel​ «2» напишем цифру​ нажатой клавише «Ctrl»,​ кнопкой мыши, добавить​ не получилось с​webley​z = 2​ Long, strTmp As​ 576 и колонок​ нажмите Enter). Как​
​ можно воспользоваться одним​
​Francofan​ Step 2​
​ них обойтись? Спасибо!​ Excel».​Новые строки встали на​
​ столбец «В» (с​
​ перейдет в другую​
​ «3». Формула получится​
​ все строки, под​

planetaexcel.ru

Как в Excel’е (2010) вставить строки после каждой строки в выбранном диапазоне?

​ ячейку​ этим способом.​: r = 2​Sheets(«Лист1»).Range(«A2:Q3000»).Clear​ Long, strIt As​ 16 384 не​

​ выделять несмежные диапазоны​​ из двух способов:​: Выделить строку​
​Cells(i, 3).EntireRow.Insert​KuklP​vveco​ место старых строк,​
​ цифрами 2) стал​ таблицу на другом​ такая. =ЕСЛИ(ОСТАТ(СТРОКА();3);»»;ИНДЕКС(A:A;СТРОКА()/3))​ которыми нужно вставить​
​Александр туманов​Использовал формулу из​While r Rows®.Insert​For i =​ Long​ меняется. Просто последние,​ вы уже знаете​Перейдите курсором и активируйте​
​Нажать CTRL​
​Next i​
​: Копируйте в ворд​
​: Вопрос в том,​ а старые сместились​
​ – «С».​ листе именно на​Получится такая таблица.​ пустую строку (каждую​
​: выдели 14 строку,​ темы, на кот.​r = r + 2​
​ 2 To Range(«A»​
​Dim Iz As​
​ заменяют предыдущие… Данный​
​ из предыдущих уроков.​ ячейку A1. Потом​И не отпуская​End Sub​ как неформатированный текст​
​ что значения из​ вниз, изменив свой​
​Второй способ.​
​ строку этого заказчика.​
​Третий вариант.​
​ строку отдельно, не​
​ правой кнопкой мыши​
​ давал ссылку. Вставил​Wend​
​ & Rows.Count).End(xlUp).Row​ String, Kuda As​ факт следует учитывать​Теперь снова используйте инструмент​ перейдите на закладку​

​ эту клавишу выделить​​Помогите пожалуйста!​
​ и заменяйте знак​
​ сформированного в экселе​ адрес.​Вставить столбец в Excel​
​Можно применить такие​В​

​ все вместе).​​ щелкни на номере​
​ формулу в Н1,​

​puz​​If Cells(i, 1)​ String​

​ при заполнении листа​​ «Главная»-«Вставка»-«Вставить строки на​ «Главная» раздел инструментов​ следующие строки.​Т.е. есть столбец данных,​ абзаца на разрыв​ столбца будут использоваться​

​Добавить пустые строки в​​– это вызвать​

​ ссылки в списках​​ставить пустые строки в​Когда выделим все​ 14 строки вылезет​ растянул сначала по​

Как вставить строку или столбец в Excel между строками и столбцами

​: Всем большое спасибо,​ = «» Then​Iz = «НАРА»​ данными более чем​ лист». На рисунке​ «Ячейки» кликните по​Потом нажать ВСТАВИТЬ​ я хочу проредить​ строки и знак​ в текстовом формате​ Excel через одну,​ контекстное меню на​

​ по классам, ссылки​Excel через одну.​ нужные строки, отпускаем​ контекстное меню, нажми​

​ строке, потом вниз:​ но я к​Set iz1 =​Kuda = «Лист1​ на 50%-80%.​ видно как вставить​ инструменту «Вставить» из​ СТРОКИ​ его пустыми строками.​ абзаца.​ в другой программе.​ две строки​ любой ячейке столбца,​ — на контакты​

Как в Excel вставить столбец между столбцами?

​Нам нужно вставить​ клавишу «Ctrl». Нажимаем​ на «копировать. «,​

​Есть список на 100​ сожалению не понял​ Range(Cells(i, «D»), Cells(i,​ (2)»​aikyaira​

1. ​ пустую строку в​ выпадающего списка выберите​Я татьяна​ Данных очень много,​Казанский​ В той программе​, т.д.​ слева от которого​ родителей, списки товаров,​
2. ​ пустые строки в​ на выделенную строку​ щелкаешь так же​ товаров все в​ ничего. Покажите, плиз,​

​ «Q»))​strIt = Sheets(Iz).Cells(Sheets(Iz).Rows.Count,​: Добрый день, уважаемые​

​ Excel между строками.​

Вставка нескольких столбцов между столбцами одновременно

​ опцию «Вставить столбцы​: Вау! Всё получилось!​ вручную — не​: Каким образом данные​ нужно чтобы значения​Например, нам нужно​ будем вставлять новый​ разделов, сотрудников по​ несколько столбцов таблицы,​ правой мышкой. Выбираем​ ещё раз и​ одну колонну, каждый​ на примере. Прилепляю​

​sm = Application.Sum(Range(Cells(i,​ 4).End(xlUp).Row​ знатоки!​Несложно догадаться о втором​ на лист».​

​Спасибо огромное!​ вариант.​ переносятся из Excel​ были разделены пустой​ в заполненной таблице,​ столбец. Также выбираем​ отделам, т.д. Как​ на всю ширину​ из контекстного меню​ выбери пункт «добавить​ товар с новой​

Как вставить строку в Excel между строками?

​ кусок из моего​ «D»), Cells(i, «Q»)))​strOk2 = Sheets(Kuda).UsedRange.Rows.Count​Подскажите, пожалуйста, решение​ способе. Нужно выделить​Щелкните правой кнопкой мышки​

​Организация кбрцдо​Алексей матевосов (alexm)​ в другую программу​ строкой.. Т.е. вручную​ между строками вставить​ «вставить» во втором​ сделать такие гиперссылки,​ таблицы, т.д. Сначала​ функцию «Вставить» -​ скопированные ячейки».​ строки, нужно перенести​ файла.​Else​

​If strOk2 >​ проблемы:​ заголовки строк 1​ по заголовку столбца​: Алексей Матевосов, спасибо​: Можно задачу решить​

​ — через сохранение​ вставлять пустые строки​ пустые строки по​ разделе появившегося окна.​ смотрите в статье​ напишем формулу как​ «Строку». Получится так.​Радик рахматуллин​

​ в новый документ​Казанский​Set iz2 =​ 1 Then Sheets(Kuda).Rows(«2:»​Во вложенном файле​

​ и 3. Кликнуть​ A. Из появившегося​ огромное!​

Удаление строк и столбцов

​ макросом​ в txt или​ в экселе -​ всей таблице, т.д.​ И здесь уже​ «Гиперссылка в Excel​

​ во втором варианте.​Добавить пустые столбцы в​: Наведи курсор на​ с расстоянием в​: Что показать -​

​ Range(Cells(i, «A»), Cells(i,​ & strOk2).Delete Shift:=xlUp​ есть лист с​ правой кнопкой по​ контекстного меню выберите​Артур минвалеев​Разрешаем выполнение макросов​ копированием — вставкой?​

​ не вариант :),​ Как это сделать,​ выбираем – «столбец»​ на другой лист».​ Затем, скопируем эту​Excel через один​ крайний левый столбец​ 5 строк между​ конечный результат? Он​

​ «C»))​Sheets(Kuda).Columns(«D:N»).Cut​ названием «НАРА»-это лист,​ одной из выделенных​ опцию «Вставить»​

​: 6 часов мучался​ Сервис -> Макрос​Перевод строки в​ пока делаю это​ смотрите в статье​ -> «ОК». Про​Добавить и удалить строку,​ формулу вправо на​.​ (цифровое ообозначение строк)​ каждым из товаров.​ очевиден. А если​Set iz3 =​

exceltable.com

Вставка заполненных строк через одну (Формулы/Formulas)

​Sheets(Kuda).Columns(«AD:AD»).Insert Shift:=xlToRight​​ который хотелось бы​ строк и выбрать​
​Теперь можно заполнить новый​ искал так как​
​ -> Безопасность ->​ ячейке вводится с​ в Notepad++ добавляя​ «Вставить пустые строки​ контекстное меню читайте​ столбец в Excel​ нужное количество столбцов.​Выделяем столбцы с​ , клик правой​Алексей матевосов (alexm)​ Вы не знаете,​ Range(Cells(i, «D»), Cells(i,​strOk1 = 2​ переделать, лист с​ опцию «Вставить».​ столбец номерами позиций​ не понимаю ни​ Средняя.​ помощью Alt+Enter. Но​ пустую строку, что​ в Excel через​ здесь.​можно в любом​Например, в нашей​

​ нажатой клавишей «Ctrl»​​ кнопкой мыши -​: Можно формулами или​ как вводить формулы​ «Q»))​strOk2 = 2​ названием «Лист 1»-это​Чтобы добавить строку или​ прайса.​
​ чего в этом,​Теперь вставляем макрос​ и при сохранении​ тоже не айс..​ одну».​
​Сразу посмотрим это меню.​ месте таблицы. Можно​
​ таблице два столбца.​ (каждый столбец отдельно).​ добавить ячейки. А​ макросом.​ и как запускать​
​Set na1 =​Do​ то, во что​
​ столбец в Excel​
​​ алексей лучший просто!​ Сервис -> Макрос​ в txt, и​Самое простое решение​
​Как создать таблицу​ Здесь можно выбрать​ вставить сразу несколько​
​ Мы копируем формулу​
​ Затем из контекстного​ лучше скопировать верхнюю​
​Вариант с макросом.​ макрос - извините...​
​ Sheets("Лист1").Cells(z, "O")​
​If Len(Sheets(Iz).Cells(strOk1, 1))​ надо переделать. Теперь​ используйте горячие клавиши​
​В нашем прайсе все​
​ спасибо!​
​ -> Редактор Visual​
​ при копировании Excel​
​ было бы вставить​
​ в Excel смотрите​ то, что хотим​
​ строк, столбцов в​ в ячейку D1.​
​ меню выбираем функцию​ или нижнюю строку​Допустим 100 товаров​
​Казанский​Sheets("Лист1").Cells(z, "K") =​
​ Then​
​ по порядку: строки​ CTRL+SHIFT+«плюс» предварительно выделив​
​ еще не достает​
​Ас​
​ Basic.​ добавляет кавычки к​
​ в конец содержимого​ в статье «Как​
​ вставить: столбец, строку,​
​ нужном месте таблицы.​
​Теперь выделяем ячейки​ «Вставить столбец».​
​ таким же способом​ в столбце А​: Кстати, обнаружил: если​ sm​
​Sheets(Iz).Range(Sheets(Iz).Cells(strTmp, 1), Sheets(Iz).Cells(strTmp,​ без адреса дома,​ их.​
​ двух столбцов: количество​
​: Спасибо Алексей!​
​Далее в редакторе​
​ содержимому таких ячеек.​

​ каждой ячейки символ,​​ сделать таблицу в​
​ ячейки, которые встанут​
​ Есть несколько способов.​ C1 и D1​Как настроить таблицу, чтобы​ - добавить скопированные​
​ на Лист1​ выбрать в столбце​Sheets("Лист1").Range("A" & z​ 28)).Copy Sheets(Kuda).Cells(strOk2, 1)​
​ обозначенные жирным нужно​
​Примечание. Новые строки всегда​
​ и единицы измерения​Василий махароблишвили​ VBA в окошке​
​ Вот результат копирования-вставки:​ который бы добавлял​
​ Excel» тут.​ справа или внизу​Как добавить столбец в​
​ и копируем (протягиваем)​ столбец добавлялся автоматически,​
​ ячейки. Дерзай.​
​С промежутками делаем​ каждую ячейку, делая​ & ":Q" &​
​Sheets(Iz).Range(Sheets(Iz).Cells(strOk1, 1), Sheets(Iz).Cells(strOk1,​ скопировать над каждым​ добавляются сверху над​
​ (шт. кг. л.​: ХМ, а теперь​
​ VBAProject кликаем по​без перевода строки​
​ пустую строку.. вот​Как удалить строку, столбец​ от выделенной ячейки.​
​ таблицу Excel​
​ их вниз до​ читайте в статье​
​Let's go​ на Лист2​ Ctrl+клик на ней,​
​ z).Borders.Weight = xlThin​ 28)).Copy Sheets(Kuda).Cells(strOk2 +​
​ домом, проблема в​ выделенными строками.​
​ упак.). Чтобы одновременно​
​ как вернуть назад​
​ VBAProject(имя файла) ,​
​ в ячейке​
​ какой только?​
​ в Excel.​
​Если сначала выделить​


excelworld.ru

Вставка пустых строк под строками с данными

​.​​ конца таблицы. Получится​ «Как добавить столбец​: В 2007 и​Код макроса​ а потом правый​z = z + 1​ 1, 1)​ том, что эти​В процессе работы с​

​ добавить два столбца,​​ чтобы без пропусков​ затем Insert ->​1​KuklP​Чтобы удалить строки,​ не одну, а​Первый способ.​ так.​

​ в Excel автоматически».​​ 2010 версии нет​

​Sub Macros()​​ клик — вставить​
​Sheets(«Лист1»).Cells(z, «K») =​
​strOk2 = strOk2​
​ строки разные по​

​ Excel, удалять строки​​ выделите диапазон из​ БЫЛО?​ Module при этом​2​: crlf​ столбцы, нужно выделить​ несколько ячеек, столбцов,​

​Чтобы вставить столбец​​Таблицу Excel можно​Если нужно вставить​ добавить ячейку. Кароч​interval = 5​ — строки, то​ sm​ + 2​

​ содержанию, т.к. дома​​ и столбцы листа​ двух ячеек C1:D1.​Создавая разного рода новые​ откроется окошко вставки​4​Guest​ их и, в​ строк (столько, сколько​ в Excel, нужно​ настроить так, что​ несколько строк или​

​ выделяем нужный столбец,​​Sheets(«Лист1»).Columns(1).Copy (Sheets(«Лист2»).Columns(1))​ пустая строка вставится​Sheets(«Лист1»).Range(«A» & z​Else​ разные по категорийности​ приходится не реже​ Далее используйте тот​ таблицы, отчеты и​
​ кода.​с переводом строки​: мм.. что то​ контекстном меню во​ нам нужно вставить),​ установить курсор на​ будут автоматически сделаны​ столбцов не во​
​ а далее находим​For i =​ после каждой строки,​
​ & «:Q» &​If Len(Sheets(Iz).Cells(strOk1, 4))​ и где-то тариф​ чем вставлять. Поэтому​ же инструмент на​ прайсы, нельзя заранее​Код:​ в ячейке​ не работает метод​

​ втором разделе, выбрать​​ то и вставится​ строке названия столбцов,​ разделительные линии между​
​ всей таблице, то​ кнопку вставить на​ Sheets(«Лист2»).Columns(1).End(xlDown).Row To 2​ а не много​ z).Borders.Weight = xlThin​ Then​

planetaexcel.ru

Возможно ли в excel вставить текст так, чтобы каждая строка вставилась через каждые 5 строк?

​ один, где-то другой.​ стоит попрактиковаться.​ главной закладке «Вставить»-«Вставить​ предвидеть количество необходимых​———————————-​»1​ или я не​ функцию «Удалить». Или​ столько же.​

​ на том столбце,​​ строками, например, по​ можно использовать другие​
​ главной (он в​
​ Step -1​ строк в начале!​Set na2 =​
​strTmp = strOk1​ Помогите пожалуйста! ВАриант​
​Для наглядного примера удалим​
​ столбцы на лист».​
​ строк и столбцов.​
​Sub Proredit()​
​»​ понял как это​ выделить строки, столбцы​
​Третий способ.​
​ рядом с которым​
​ датам, по ценам,​
​ способы. Смотрите об​ правой части экрана)​
​Rows(i).Resize(interval).EntireRow.Insert​

​puz​​ Sheets(«Лист1»).Cells(z, «A»)​Else​ копировать-вставить выделенные ячейки​ из нашего прайс-листа​
​Или выделите два заголовка​ Использование программы Excel​On Error Resume​

Есть готовая таблица в EXCEL, но мне нужно вставить дополнительную строку между 14 и 15 строками, помогите!!!

​»2​​ правильно вставить -​ на строках их​Можно настроить Excel,​ нужно вставить столбец.​ т.д. Подробнее о​ этом статью «Как​ и жмем вставить​
​Next i​: Как вводить формулы​

​Set na3 =​​Sheets(Iz).Range(Sheets(Iz).Cells(strOk1, 1), Sheets(Iz).Cells(strOk1,​

​ на лист-это слишком​​ нумерацию позиций товара​ столбца C и​ – это в​ Next​»​ если можно -​

​ адресов. Нажать правой​​ чтобы столбцы вставлялись​ Новый столбец появится​ таком способе визуализации​ добавить строку, столбец​ строки на лист.​End Sub​ я знаю. С​ Sheets(«Лист1»).Cells(z, «O»)​ 28)).Copy Sheets(Kuda).Cells(strOk2, 1)​ долго, там около​

​ и столбец единиц​​ D, щелкните правой​ значительной степени создание​Set rngD =​»4​ поподробнее..​ мышкой на цифру​ автоматически. Смотрите статью​ слева от выделенного​ данных в таблице,​ в Excel».​ PROFIT​

​[ссылка заблокирована по​​ макросами у меня​z = z + 1​strOk2 = strOk2​ тысячи домов​ измерения – одновременно.​ кнопкой мышки и​ и настройка таблиц,​ Application.InputBox(Prompt:=»Выделите диапазон для​»​KuklP​ адреса выделенной строки​

​ «Как добавить столбец​

Вставить заданное количество пустых ячеек через строку

Lunatic Дата: Среда, 21.08.2013, 21:12 | Сообщение № 1 Группа: Пользователи Ранг: Прохожий Сообщений: 5 Репутация: 0 ± Замечаний: 0% ± Excel 2010 Всем привет. Подскажите чайнику, как можно решить следующую задачу. Есть диапазон строк (все заполнены). Надо вставить заданное количество пустых строк в диапазон через каждую заполненную строку, т.е. сдвигать ячейки вниз. Большая просьба , только понятным языком. если вообще возможно , то без всяких там макросов. очень нужно для работы !   Ответить

Serge_007 Дата: Среда, 21.08.2013, 21:27 | Сообщение № 2 Группа: Админы Ранг: Местный житель Сообщений: 15894 Репутация: 2623 ± Замечаний: ± Excel 2016 Без макросов вставить пустые строки в исходные данные — только вручную Формулами можно в соседнем столбце: Код =ЕСЛИ(ЦЕЛОЕ(СТРОКА()/3)=СТРОКА()/3;ИНДЕКС(C$3:C$11;СТРОКА()/3);»») К сообщению приложен файл: Lunatic.xls (31.5 Kb) ЮMoney:41001419691823 | WMR:126292472390   Ответить

_Boroda_ Дата: Среда, 21.08.2013, 21:28 | Сообщение № 3 Группа: Модераторы Ранг: Местный житель Сообщений: 16618 Репутация: 6465 ± Замечаний: 0% ± 2003; 2007; 2010; 2013 RUS В общем случае В ячейке I1 количество пустых строк, которые нужно добавить Код =ЕСЛИ(ОСТАТ((СТРОКА()-СТРОКА(G$3));(I$1+1))=0;ИНДЕКС(C$3:C$11;(СТРОКА()-СТРОКА(G$3))/(I$1+1)+1);»») Скажи мне, кудесник, любимец ба’гов… Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995   Ответить

Lunatic Дата: Среда, 21.08.2013, 21:35 | Сообщение № 4 Группа: Пользователи Ранг: Прохожий Сообщений: 5 Репутация: 0 ± Замечаний: 0% ± Excel 2010 ух ты !!! работает! спасибо, Serge 007, а у нас с позволения сказать IT отдел так ничего и не ответил )))   Ответить

Lunatic Дата: Среда, 21.08.2013, 21:42 | Сообщение № 5 Группа: Пользователи Ранг: Прохожий Сообщений: 5 Репутация: 0 ± Замечаний: 0% ± Excel 2010 а вот Сашино решение у меня почему-то не работает. всё так же и выстаивается   Ответить

Lunatic Дата: Среда, 21.08.2013, 21:49 | Сообщение № 6 Группа: Пользователи Ранг: Прохожий Сообщений: 5 Репутация: 0 ± Замечаний: 0% ± Excel 2010 в вашем — да, работает.   Ответить

Lunatic Дата: Среда, 21.08.2013, 22:04 | Сообщение № 7 Группа: Пользователи Ранг: Прохожий Сообщений: 5 Репутация: 0 ± Замечаний: 0% ± Excel 2010 ааа! тоже классная формула. спасибо. всё сохранила .   Ответить

AlexM Дата: Четверг, 22.08.2013, 09:28 | Сообщение № 8 Группа: Друзья Ранг: Участник клуба Сообщений: 4257 Репутация: 1046 ± Замечаний: 0% ± Excel 2003 Еще можно так Код =ЕСЛИ(ОСТАТ(СТРОКА();3);»»;ИНДЕКС(C$3:C$11;СТРОКА()/3)) Номер мобильного модема (без голосовой связи) 9269171249 МегаФон, Московский регион.   Ответить

ASUS Дата: Понедельник, 04.09.2017, 13:13 | Сообщение № 9 Группа: Пользователи Ранг: Новичок Сообщений: 31 Репутация: 0 ± Замечаний: 20% ± Excel 2013 Привет всем.Есть таблица со строками идущей подряд. Как добавить формулой между этими строками один пустую строку. Приложу файл чтобы была понятно. Заранее спасибо за предоставленный ответ. Нельзя остановиться на достигнутом.   Ответить

_Boroda_ Дата: Понедельник, 04.09.2017, 13:18 | Сообщение № 10 Группа: Модераторы Ранг: Местный житель Сообщений: 16618 Репутация: 6465 ± Замечаний: 0% ± 2003; 2007; 2010; 2013 RUS Читайте Правила форума. Пункты 4 и 5q в особенности. Тема закрыта Скажи мне, кудесник, любимец ба’гов… Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995   Ответить

Добавление/удаление строк и столбцов в таблицу Excel производится аналогично работе с обычными ячейками рабочего листа и действия выполняются такие же, как при обычной работе. Однако таблицы как особый элемент позволяют добавлять данные и другими способами.

Как и при работе с простыми данными на рабочем листе вставить строки или столбцы на лист можно через специальное меню на ленте инструментов в разделе «Главная» — «Ячейки» — «Вставить».

К двум привычным пунктам вставки строк на лист добавились пункты вставки строк в таблицу. Целых четыре пункта меню для вставки доступно только когда курсор будет стоять в последней ячейке таблицы, а так в основном придется довольствоваться двумя стандартными, вставить строку сверху в таблице и столбец слева таблицы. Между вставкой строк и столбцов на лист и в таблицу есть логическая разница. Вставка строк в таблицу, увеличивает таблицу на строку, не меняя положения данных на листе. Вставка строки на лист добавляет новую строку на лист и в таблицу, если таблица окажется на пути вставки строки.

Добавим два значения в ячейки на разных строках листа, за пределами таблицы.

Выберем пункт меню «Вставить строки таблицы сверху» и в итоге получим такой результат:

Как видно значение «К5» осталось на прежнем месте, в таблицу была добавлена пустая строка. Строки, которые были уже в таблице, сместились вниз. Если вместо вставки строки в таблицу выбрать из той же позиции вставку строки на лист, получим:

Здесь уже видно что строка была добавлена на лист, поэтому ячейка со значением «К5» сдвинулась вниз. И так как таблица попала в добавляемую строку, то в таблицу так же была добавлена новая строка. С добавлением столбцов на лист и в таблицу происходит то же самое. Ну и, конечно же, аналогичные пункты есть в контекстном меню, вызываемом по щелчку правой кнопки мыши. За тем исключением что в контекстном меню будут только пункты, относящиеся к типу выделенной ячейки. Если это таблица то будут пункты вставки строки и столбца в таблицу. Если простые данные на листе, то будут пункты вставки строки и столбца на лист.

Авторазвертывание

Добавить строку в конец таблицы можно еще одним интересным способом. Если встать под любым столбцом. В первой после таблице строке и ввести данные, Excel автоматический посчитает что Вы добавляете новую строку в таблицу и расширит таблицу на эту строку. Точно так же будет и со столбцом, введя данные в первом после таблицы столбце. Вы укажите что столбец принадлежит таблице и размер таблицы будет увеличен еще на один столбец. Такое поведение таблицы называется «Авторазвертывание таблицы». Отменить его можно нажав кнопку «Отмена» или нажав комбинацию клавиш «Ctrl+Z». Отменено будет только авторазвертывание, данные которые Вы ввели останутся.

Аторазвертывание выполняется только если в соседней с таблицей строке или столбце, в границах существующих размеров таблицы, все ячейки в направлении развертывания пустые. Аторазвертывание по столбцу будет осуществлено даже в том случае если в первом от таблице столбце будет введена формула. Мало того так как считается что областью действия формулы в столбце таблицы являются все строки таблицы, формула будет распространена на все существующие строки. То есть введя формулу в любой ячейке справа от таблицы на первом шаге будет выполнен расчет формулы для текущей строки. Затем так как ячейка сразу за таблицей будет осуществлено авторазвертывание. С включением столбца в состав таблицы. На третьем шаге введенная формула будет распространена на все остальные строки нового столбца таблицы.

Автоименование

Отличительной особенностью таблиц является то, что у каждого столбца есть имя. При добавлении новых столбцов в таблицу им автоматический присваиваются имена «Столбец1», «Столбец2» и т.д. Разумеется, эти имена в дальнейшем можно изменить. Всегда хорошим тоном считалось правильное и корректное оформление данных, не стоит пренебрегать им и в этом случае, задавайте столбцам таблицы имена отражающие суть данных в столбце.

Автоматическое расширение таблицы происходит и при вставке значений из буфера обмена. При этом таблица увеличивается на необходимое количество строк и/или столбцов. Однако при вставке значений следует помнить, что вставка заменяет значения в таблице и при необходимости увеличивает размер таблицы, но не удаляет данные из таблицы. Поэтому будьте внимательны вставляя меньшее количество значений в большую таблицу. Например, при вставке 10 строк в таблицу, в которой пока 8 строк, таблица будет увеличена на 2 строки и значения соответствующих ячеек таблицы будут заменены. Но если вставлять в таблицу размерностью 10 строк диапазон, состоящий из 8 строк, в таблице останется 10 строк, при этом значения от текущего положения курсора будут заменены, остальные значения таблицы, не попадающие во вставляемый диапазон, останутся без изменений.

Тянем

В нижнем правом углу любой таблицы есть специальный уголок-маркер, потянув за который мышкой можно добавить строки или столбцы в таблицу. Это чем-то напоминает процесс растягивания рабочего окна в операционной системе, маркер в правом нижнем углу в виде уголка, потянув за который увеличим размеры. Единственное ограничение при работе с таблицами, за один раз можно добавить или строки или столбцы, растянуть таблицу по диагонали не получится.

Еще одно важное замечание по поводу добавления строк в таблицу. Таблица запоминает какое было установлено форматирование, защита ячеек, проверка данных и т.д. все эти параметры будут применяться к новым строкам.

С удалением строк и столбцов таблицы выполняются действия обратные вставке строк и столбцов, при этом применяется такая же логика действий. Команды удаления доступны как из ленты инструментов «Главная» — «Ячейки» — «Удалить» так и из контекстного меню. При этом удаление строки листа или столбца листа приводит к другим результатам, нежели удаление строки или столбца таблицы. Удаление строк и столбцов в таблице оказывает влияние только на таблицу, а удаление строк и столбцов листа влияет на весь лист и если на пути удаляемой строки или столбца встречается таблица, то строка/столбец будут удалены и из нее.

Поделиться ссылкой:

Похожее

Вставка или Ctrl+V, пожалуй, самый эффективный инструмент доступный нам. Но как хорошо вы владеете им? Знаете ли вы, что есть как минимум 14 различных способов вставки данных в листах Ecxel? Удивлены? Тогда читаем этот пост, чтобы стать пэйст-мастером.

Данный пост состоит из 2 частей:

— Основные приемы вставки

— Вставка с помощью обработки данных

1. Вставить значения

Если вы хотите просто вставить значения с  ячеек, последовательно нажимайте клавиши Я, М и З, удерживая при этом клавишу Alt, и в конце нажмите клавишу ввода. Это бывает необходимо, когда вам нужно избавиться от форматирования и работать только с данными.

Начиная с Excel 2010, функция вставки значений отображается во всплывающем меню при нажатии правой клавишей мыши

 2. Вставить форматы

Нравиться этот чудный формат, который сделал ваш коллега? Но у вас нет времени, чтобы так же оформить свою таблицу. Не беспокойтесь, вы можете вставить форматы (включая условное форматирование) из любой скопированной ячейки. Удерживая клавишу Alt, последовательно нажимайте Я, М, Ф, Ф, Ф и в конце нажмите клавишу Ввода.

Те же самые действия можно произвести с помощью меньшего количества операций, воспользовавшись меню, которое выпадает при нажатии правой кнопки мыши (начиная с Excel 2010).

3. Вставить формулы

Иногда возникает необходимость скопировать несколько формул в новый диапазон. Для этого, удерживая клавишу Alt, последовательно нажимаем Я, М, Ф и в конце нажмите клавишу Ввода. Вы можете достичь того же эффекта, путем перетаскивания ячейки, содержащей формулу, в новый диапазон, если диапазон находится рядом.

4. Вставить проверку данных

Хотите скопировать только проверку значений, без содержимого и форматов ячейки. Для этого копируете ячейку, в котором присутствует проверка условий, щелкаете правой кнопкой мыши на ячейку, куда хотите скопировать данные. Выбираете Специальная вставка -> Условия на значения.

5. Скопировать ширину столбцов с других ячеек

Вашему боссу понравилась, созданная вами, табличка по отслеживанию покупок и он попросил создать еще одну, для отслеживания продаж. В новой таблице вы хотите сохранить ширину столбцов. Для этого вам нет необходимости измерять каждый столбец первой таблицы, а просто скопировать их и с помощью специальной вставки задать «Ширина столбцов».

6. Берем комментарии и вставляем в другом месте

Чтобы сократить количество перепечатываний, комментарии тоже можно вставлять копипейстом. Для этого необходимо воспользоваться специальной вставкой и указать «Вставить примечания»

7. И конечно, вставляем все подряд

В этом нам помогут сочетания клавиш Ctrl+V или Alt+Я+М или клавиша вставки на панели инструментов.

Вставка с помощью обработки данных

8. Вставка с дополнительной математической операцией

К примеру, у вас имеется строка 1 со значениями 1, 2, 3, и строка 2 со значениями 4, 5, 6. И вам необходимо сложить обе строки, чтобы получить 5, 7, 9. Для этого копируем первую строку, жмем правой кнопкой мыши по строке 2, выбираем Специальная вставка, ставим переключатель на «Сложить» и жмем ОК.

Те же самые операции необходимо будет проделать, если вам требуется вычесть, умножить или разделить данные. Отличием будет, установка переключателя на нужной нам операции.

9. Вставка с учетом пустых ячеек

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

В диалоговом окне «Специальная вставка» установите галку «Пропускать пустые ячейки»

10. Транспонированная вставка

К примеру, у вас имеется колонка со списком значений, и вам требуется переместить (скопировать) данные в строку (т.е. вставить их поперек). Как бы вы это сделали? Ну конечно, вам следует воспользоваться специальной вставкой и в диалоговом окне установить галку «Транспонировать». Либо воспользоваться сочетанием клавиш Alt+Я, М и А.

Эта операция позволит транспонировать скопированные значения прежде, чем вставит. Таким образом, Excel преобразует строки в столбцы и, наоборот, столбцы в строки.

11. Вставить ссылку на оригинальную ячейку

Если вы хотите создать ссылки на оригинальные ячейки, вместо копипэйстинга значений, этот вариант, то, что вам нужно. Воспользуйтесь специальной вставкой, как примерах выше, и вместо кнопки «ОК» , нажмите «Вставить связь». Либо воспользуйтесь сочетанием клавиш Alt+Я, М и Ь, что создаст автоматическую ссылку на скопированный диапазон ячеек.

12. Вставить текст с разбивкой по столбцам

Эта опция полезна, когда вы вставляете данные извне. Например, если вы хотите вставить несколько строчек этого блога на лист Excel, но при этом каждое слово было в отдельном столбце. Для этого копируем текст (Ctrl+C), переходим на лист Excel и вставляем данные (Ctrl+V). У меня, по умолчанию, программа вставила строку с текстом в одну ячейку. Теперь необходимо проделать небольшой финт ушами. Идем во вкладку «Данные» -> «Текст по столбцам» и настраиваем мастер текстов. На первом шаге указываем формат данных – «с разделителями», жмем «Далее», устанавливаем символ-разделитель —  «Пробел» и «Готово». Текст, который, мы вставили в одну ячейку разбился по столбцам. Таким образом мы указали программе, как бы мы хотели воспринимать текстовые данные.

Теперь, во время последующих вставок текста, кликаем правой кнопкой по ячейке, куда вы хотите вставить текст, выбираем «Специальная вставка» -> «Текст» -> «ОК». Excel разбил нашу строку на столбцы, что нам и требовалось.

13. Импорт данных из интернета

Если вы хотите импортировать данные с интернета в реальном времени, вы можете воспользоваться веб-запросами Excel. Это мощный инструмент, который позволяет извлекать данные из сети (или сетевых ресурсов) и отображает их в виде электронной таблицы. Узнать больше об импорте данных вы можете прочитав статью о веб запросах Excel.

14. Какой ваш любимый способ вставки?

Есть еще много других скрытых способов вставки, таких как вставка XML-данных, изображений, объектов, файлов и т.д. Но мне интересно, какими интересными приемами вставки пользуетесь вы. Напишите, какой ваш любимый способ вставки?