powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / КАК СДЕЛАТЬ авто вставку строк
6 сообщений из 6, страница 1 из 1
КАК СДЕЛАТЬ авто вставку строк
    #34234403
ANMIKA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Привет все и с Новым Годом !

Есть 2 файла 1 и 2. В файле А1 стоят данные в строках А1 А2 А3. Мне необходимо скопировать эти данные и вставить в файл 2, но что бы данные стояли в А1 А3 А5, то есть межжду ними вставлялись автоматически строки и сохранить это как шаблон.

Помогите please
спасибо
...
Рейтинг: 0 / 0
КАК СДЕЛАТЬ авто вставку строк
    #34234441
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
просто формулой чем не подходит?
...
Рейтинг: 0 / 0
КАК СДЕЛАТЬ авто вставку строк
    #34234540
ANMIKA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Просто формулой будут на один раз, а необходимо сохранить именно как шаблон.
Спасибо
...
Рейтинг: 0 / 0
КАК СДЕЛАТЬ авто вставку строк
    #34234542
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
тогда поподробнее напишите в какой момент должно быть копирование, и как задействуется в задаче шаблон
...
Рейтинг: 0 / 0
КАК СДЕЛАТЬ авто вставку строк
    #34240260
ANMIKA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вопрос такой
Получаем файл Exce, в нём стоит приблизительно 500 строк. Необходимо скопировать данные из этого файла и вставить в другой файл, но при этом между каждой строкой необходимо вставить пустую строку.
Вот и всё.
Может это и просто, но я не могу.
Так что помогите
...
Рейтинг: 0 / 0
КАК СДЕЛАТЬ авто вставку строк
    #34240527
Michael5
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Предлагаю такой вариант:

выделяем вторую строку, и шагаем вниз, повторяя вставку строки, пока не кончится текст:

Start = 2
While Cells(Start, 1) <> ""
Rows(Start).Select
Selection.Insert Shift:=xlDown
Start = Start + 2
Wend
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / КАК СДЕЛАТЬ авто вставку строк
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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