Как создать новый файл на основе данных исходного файла

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Как создать новый файл на основе данных исходного файла (Формулы/Formulas)

Igor_N

Дата: Четверг, 21.02.2019, 07:41 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 4

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

Как автоматически по требованию создать новый файл на основе нужных данных из других (другого) файла?
Вижу так: подготовил данные в исходном файле, в нем же нажал кнопку и новый файл из данных выбранного диапазона сформировался

Ответить

Russel

Дата: Четверг, 21.02.2019, 13:35 | Сообщение № 2

Группа: Друзья

Ранг: Старожил

Сообщений: 1394

Репутация: 320 ±

Замечаний: 0% ±

Excel 2010

Привет!
1. Прочитать правила форума
2. Подготовить файл-пример
3. Поздороваться
4. Описать исходную ситуацию и желаемый результат

QIWI 9173973973

Ответить

Igor_N

Дата: Пятница, 22.02.2019, 11:44 | Сообщение № 3

Группа: Пользователи

Ранг: Прохожий

Сообщений: 4

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

Прочитал

Доброе утро, день, вечер, ночь!

Как автоматически по требованию создать новый файл на основе нужных данных из других (другого) файла?
Вижу так: подготовил данные в исходном файле, в нем же нажал кнопку и новый файл из данных выбранного диапазона сформировался, данные поместились в определенное место.

Подготовил 2 файла:
1) Исходный с данными , вычислениями, результатом и, конечно же, с волшебной кнопкой
2) Файл с итогом вычислений в который после нажатия кнопки "перелились" только те данные которые мне нужно и поместились в нужные мне ячейки

К сообщению приложен файл: ishod.xlsx (10.4 Kb) · Itog.xlsx (8.1 Kb)

Сообщение отредактировал Igor_N - Пятница, 22.02.2019, 11:48

Ответить

Igor_N

Дата: Среда, 27.02.2019, 07:06 | Сообщение № 4

Группа: Пользователи

Ранг: Прохожий

Сообщений: 4

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

Цитата Russel, 21.02.2019 в 13:35, в сообщении № 2 ()

1. Прочитать правила форума
2. Подготовить файл-пример
3. Поздороваться
4. Описать исходную ситуацию и желаемый результат

Добрый день!

Т.е. если я правильно понял, все Ваши советы (прочитать, подготовить, поздороваться ...) не помогли. Советов для решения моей задачи нет.

Ответить

Pelena

Дата: Среда, 27.02.2019, 08:34 | Сообщение № 5

Группа: Админы

Ранг: Местный житель

Сообщений: 19405

Репутация: 4555 ±

Замечаний: ±

Excel 365 & Mac Excel

[vba]

Код

Public Sub MoveResult()
    Dim wb As Workbook, x
    Workbooks.Add
    Set wb = ActiveWorkbook
    x = ThisWorkbook.Sheets("Лист1").Range("D3:D14").Value
    wb.Sheets("Лист1").Range("C3:C14").Value = x
End Sub

[/vba]