как вставить макрос в excel 2010



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

Автор Maxim Matrenitski задал вопрос в разделе Программное обеспечение

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

Ответ от Алексей Матевосов (AlexM)[гуру]
Можно задачу решить макросом Разрешаем выполнение макросов Сервис -> Макрос -> Безопасность -> Средняя. Теперь вставляем макрос Сервис -> Макрос -> Редактор Visual Basic. Далее в редакторе VBA в окошке VBAProject кликаем по VBAProject(имя файла) , затем Insert -> Module при этом откроется окошко вставки кода. Код: ----------------------------------Sub Proredit() On Error Resume Next Set rngD = Application.InputBox(Prompt:="Выделите диапазон для " & Chr(13) _ & "прореживания пустыми строками", Title:="Ввод диапазона", Type:=8) rs = rngD.Item(1).Row rf = rngD.Item(rngD.Count).Row Application.ScreenUpdating = False For i = rs To rf * 2 - rs - 1 Step 2 Rows(i + 1).Insert Shift:=xlDown Next i Application.ScreenUpdating = True End Sub ----------------------------------Вставляем код. Переходим в окно Excel Запускаем макрос Сервис -> Макрос -> Макросы, выбираем макрос "Proredit" и жмем выполнить.

Ответ от Francofan[гуру]
Выделить строку Нажать CTRL И не отпуская эту клавишу выделить следующие строки. Потом нажать ВСТАВИТЬ СТРОКИ

Ответ от Tatu[новичек]
Вау!!!! Всё получилось!Спасибо огромное!

Ответ от Организация КБРЦДО[активный]
Алексей Матевосов, спасибо огромное!!!!

Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с похожими вопросами и ответами на Ваш вопрос: Как в Excel'е (2010) вставить строки после каждой строки в выбранном диапазоне?
 

Ответить на вопрос:

Имя*

E-mail:*

Текст ответа:*
Проверочный код(введите 22):*