Excel сохранен в фрагменте

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

Могут возникать ситуации, при которых необходимо отправить кому-либо определенную информацию, например, небольшую часть большого отчета и сделать это таким образом, чтобы не посвящать получателя в лишние детали – расчеты, итоги, показатели и так далее.

Обычно, у пользователей не возникает проблем с тем, чтобы скопировать диапазон ячеек и вставить либо в отдельную рабочую книгу при помощи специальной вставки значений, чтобы заменить формулы результатами вычислений, либо в документ приложения Word. Даже такая простая операция требует от пользователя выполнения целого ряда определенных действий: скопировать диапазон, создать новый файл в нужном формате, вставить диапазон, сохранить новый файл. Если возникает необходимость проделывать такую операцию по несколько раз в день, стоит задуматься об автоматизации этого процесса.

Экспорт диапазона ячеек в файл

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

diapazon v fajl

Надстройка – это дополнительные функциональные возможности для приложения. Чтобы воспользоваться такими возможностями, надстройку необходимо установить. При этом, как правило, создается новая вкладка на ленте Excel и создается кнопка вызова диалогового окна.

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

В поле «Выбор диапазона» автоматически подставляется адрес выделенного на листе диапазона ячеек, либо несколько адресов через знак-разделитель «;» (точка с запятой), если выделено несколько диапазонов.

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

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

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

Как сохранить выделенные диапазоны изображениями?

Обычно, делается скриншот, то есть снимается изображение с экрана кнопкой «Print Screen» на клавиатуре, после этого изображение из буфера обмена вставляется в графический редактор и уже там вырезается нужный фрагмент изображения. При помощи надстройки всего этого можно не делать, достаточно выделить диапазон ячеек, выбрать формат «JPG» и запустить программу. Изображение выделенного диапазона будет сохранено в заданную папку с заданным именем в формате JPG.

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

Исходный диапазон ячеек может быть определенным образом отформатирован, иметь определенные шрифты, ширины столбцов и так далее, кроме этого в ячейках диапазона могут содержаться формулы со ссылками на ячейки в других листах и других рабочих книгах. Чтобы скопировать такой диапазон в другую книгу, необходимо проделать ряд операций: скопировать диапазон, вставить диапазон, для вставки ширин столбцов вставить диапазон еще раз при помощи специальной вставки, для переноса форматов вставить диапазон еще раз при помощи специальной вставки форматов, заменить формулы значениями ячеек. При помощи надстройки все эти операции выполняются автоматически.

Как сохранить диапазон документом Word?

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

Как сохранить диапазон в pdf-файл

При сохранении диапазонов ячеек в pdf-формат, также есть возможность изменения ориентации страницы, но все-таки после создания файла лучше убедиться, что область выделения из Excel помещается на одну страницу в горизонтальном измерении, иначе часть данных из выделенного диапазона в pdf-файле будет не видна.

Добрый день, есть список, его сотрудники пополняют и в конце рабочего дня они выделяют все записи за день и нажимаю кнопку, запись выделенного (на нем макрос)
суть макроса копирование выделенной области на др лист (уже сделал) и копирование выделенных данных в отдельный файл и его пополнение (не сделал) и хочу еще отчищать раб область (лист куда сотрудники в течение дня вводят записи). Очень нужна ваша помощь Макросы эксель только начал изучать.

вот код макроса, копия на др лист

Добрый день, есть список, его сотрудники пополняют и в конце рабочего дня они выделяют все записи за день и нажимаю кнопку, запись выделенного (на нем макрос)
суть макроса копирование выделенной области на др лист (уже сделал) и копирование выделенных данных в отдельный файл и его пополнение (не сделал) и хочу еще отчищать раб область (лист куда сотрудники в течение дня вводят записи). Очень нужна ваша помощь Макросы эксель только начал изучать.

вот код макроса, копия на др лист

Сообщение Добрый день, есть список, его сотрудники пополняют и в конце рабочего дня они выделяют все записи за день и нажимаю кнопку, запись выделенного (на нем макрос)
суть макроса копирование выделенной области на др лист (уже сделал) и копирование выделенных данных в отдельный файл и его пополнение (не сделал) и хочу еще отчищать раб область (лист куда сотрудники в течение дня вводят записи). Очень нужна ваша помощь Макросы эксель только начал изучать.

вот код макроса, копия на др лист

понял вас, значит так по скрипту вашему

копирует замечательно, но копирует всю строку а не выделенную область.

хотел объединить мое копирование в лист и ваше в файл не получилось

Sub ЗаписьВОбщийЖурнал()
‘
‘ Макрос2 Макрос
‘ Макрос записан 15.10.2007 (VladimirovAV)
‘

Selection.Copy
Sheets(«База данных»).Select
Range(«A1″).Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
ActiveWorkbook.Save
Sheets(«Исходные данные»).Select
Selection.ClearContents
Range(«A3″).Select

If Not TypeName(Selection) = «Range» Then Exit Sub
Dim lr&, wb As Workbook, lb As Workbook
With Application: .ScreenUpdating = False: .DisplayAlerts = False: .EnableEvents = False: End With
Set wb = GetObject(«c:test.xls») ‘путь к файлу-накопителю
Set lb = ThisWorkbook
lr = wb.Sheets(1).Cells(Rows.Count, 1).End(xlUp).Row
Selection.EntireRow.Copy wb.Sheets(1).Cells(lr + 1, 1)
wb.Close (True) ‘ закрыть с сохранением
With Application: .EnableEvents = True: .DisplayAlerts = True: .ScreenUpdating = True: End With
Set wb = Nothing: Set lb = Nothing

понял вас, значит так по скрипту вашему

копирует замечательно, но копирует всю строку а не выделенную область.

хотел объединить мое копирование в лист и ваше в файл не получилось

Sub ЗаписьВОбщийЖурнал()
‘
‘ Макрос2 Макрос
‘ Макрос записан 15.10.2007 (VladimirovAV)
‘

Selection.Copy
Sheets(«База данных»).Select
Range(«A1″).Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
ActiveWorkbook.Save
Sheets(«Исходные данные»).Select
Selection.ClearContents
Range(«A3″).Select

If Not TypeName(Selection) = «Range» Then Exit Sub
Dim lr&, wb As Workbook, lb As Workbook
With Application: .ScreenUpdating = False: .DisplayAlerts = False: .EnableEvents = False: End With
Set wb = GetObject(«c:test.xls») ‘путь к файлу-накопителю
Set lb = ThisWorkbook
lr = wb.Sheets(1).Cells(Rows.Count, 1).End(xlUp).Row
Selection.EntireRow.Copy wb.Sheets(1).Cells(lr + 1, 1)
wb.Close (True) ‘ закрыть с сохранением
With Application: .EnableEvents = True: .DisplayAlerts = True: .ScreenUpdating = True: End With
Set wb = Nothing: Set lb = Nothing

Сообщение понял вас, значит так по скрипту вашему

копирует замечательно, но копирует всю строку а не выделенную область.

хотел объединить мое копирование в лист и ваше в файл не получилось

Sub ЗаписьВОбщийЖурнал()
‘
‘ Макрос2 Макрос
‘ Макрос записан 15.10.2007 (VladimirovAV)
‘

Selection.Copy
Sheets(«База данных»).Select
Range(«A1″).Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
ActiveWorkbook.Save
Sheets(«Исходные данные»).Select
Selection.ClearContents
Range(«A3″).Select

If Not TypeName(Selection) = «Range» Then Exit Sub
Dim lr&, wb As Workbook, lb As Workbook
With Application: .ScreenUpdating = False: .DisplayAlerts = False: .EnableEvents = False: End With
Set wb = GetObject(«c:test.xls») ‘путь к файлу-накопителю
Set lb = ThisWorkbook
lr = wb.Sheets(1).Cells(Rows.Count, 1).End(xlUp).Row
Selection.EntireRow.Copy wb.Sheets(1).Cells(lr + 1, 1)
wb.Close (True) ‘ закрыть с сохранением
With Application: .EnableEvents = True: .DisplayAlerts = True: .ScreenUpdating = True: End With
Set wb = Nothing: Set lb = Nothing

отказывается копировать Автор — aydar
Дата добавления — 22.03.2013 в 13:43

убрал, не получилось

убрал, не получилось

Сообщение убрал, не получилось

Sub ЗаписьВОбщийЖурнал()
‘
‘ Макрос2 Макрос

Selection.Copy
Sheets(«База данных»).Select
Range(«A1»).Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
ActiveWorkbook.Save
Sheets(«Исходные данные»).Select
Selection.ClearContents
Range(«A3»).Select

‘это часть работает замечательно

‘ это копирования выделения в другой файл
If Not TypeName(Selection) = «Range» Then Exit Sub
Dim lr&, wb As Workbook, lb As Workbook
With Application: .ScreenUpdating = False: .DisplayAlerts = False: .EnableEvents = False: End With
Set wb = GetObject(«c:test.xls») ‘путь к файлу-накопителю
Set lb = ThisWorkbook
lr = wb.Sheets(1).Cells(Rows.Count, 1).End(xlUp).Row
Selection.Copy wb.Sheets(1).Cells(lr + 1, 1)
wb.Close (True) ‘ закрыть с сохранением
With Application: .EnableEvents = True: .DisplayAlerts = True: .ScreenUpdating = True: End With
Set wb = Nothing: Set lb = Nothing

копирование в другой файл работает криво, копируется вся строка а не выделение,иногда не все данные копируются

Sub ЗаписьВОбщийЖурнал()
‘
‘ Макрос2 Макрос

Selection.Copy
Sheets(«База данных»).Select
Range(«A1»).Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
ActiveWorkbook.Save
Sheets(«Исходные данные»).Select
Selection.ClearContents
Range(«A3»).Select

‘это часть работает замечательно

‘ это копирования выделения в другой файл
If Not TypeName(Selection) = «Range» Then Exit Sub
Dim lr&, wb As Workbook, lb As Workbook
With Application: .ScreenUpdating = False: .DisplayAlerts = False: .EnableEvents = False: End With
Set wb = GetObject(«c:test.xls») ‘путь к файлу-накопителю
Set lb = ThisWorkbook
lr = wb.Sheets(1).Cells(Rows.Count, 1).End(xlUp).Row
Selection.Copy wb.Sheets(1).Cells(lr + 1, 1)
wb.Close (True) ‘ закрыть с сохранением
With Application: .EnableEvents = True: .DisplayAlerts = True: .ScreenUpdating = True: End With
Set wb = Nothing: Set lb = Nothing

копирование в другой файл работает криво, копируется вся строка а не выделение,иногда не все данные копируются aydar

Sub ЗаписьВОбщийЖурнал()
‘
‘ Макрос2 Макрос

Selection.Copy
Sheets(«База данных»).Select
Range(«A1»).Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
ActiveWorkbook.Save
Sheets(«Исходные данные»).Select
Selection.ClearContents
Range(«A3»).Select

‘это часть работает замечательно

‘ это копирования выделения в другой файл
If Not TypeName(Selection) = «Range» Then Exit Sub
Dim lr&, wb As Workbook, lb As Workbook
With Application: .ScreenUpdating = False: .DisplayAlerts = False: .EnableEvents = False: End With
Set wb = GetObject(«c:test.xls») ‘путь к файлу-накопителю
Set lb = ThisWorkbook
lr = wb.Sheets(1).Cells(Rows.Count, 1).End(xlUp).Row
Selection.Copy wb.Sheets(1).Cells(lr + 1, 1)
wb.Close (True) ‘ закрыть с сохранением
With Application: .EnableEvents = True: .DisplayAlerts = True: .ScreenUpdating = True: End With
Set wb = Nothing: Set lb = Nothing

копирование в другой файл работает криво, копируется вся строка а не выделение,иногда не все данные копируются Автор — aydar
Дата добавления — 26.03.2013 в 11:36

Ну вот, зарегистрировались, теперь можно и попытаться разобраться.

У меня на моих файлах работает. Но у меня макрос уже «допиленный»
Проблема может быть в структуре данных.
Например, в приведённом Вами фрагменте кода
lr = wb.Sheets(1).Cells(Rows.Count, 1).End(xlUp).Row определяет ряд с первой пустой ячейкой В ПЕРВОМ СТОЛБЦЕ.
Поэтому если Вы копируете диапазон, где в ячейках первого столбца есть пустые, то lr определится не правильно и следующая запись наложится на предыдущую. Об этом, к стати, всё расписано в том топике, откуда Вы брали фрагмент. Вы дальше первого топика читали? Ну, например, ЭТО.

Приложите пример. Тогда кто-нибудь попробует разобраться почему у Вас не работает. (Я не смогу — на работе завал, да ещё и сисадмины закрыли скачивание файлов с макросами, собаки!)

Ну вот, зарегистрировались, теперь можно и попытаться разобраться.

У меня на моих файлах работает. Но у меня макрос уже «допиленный»
Проблема может быть в структуре данных.
Например, в приведённом Вами фрагменте кода
lr = wb.Sheets(1).Cells(Rows.Count, 1).End(xlUp).Row определяет ряд с первой пустой ячейкой В ПЕРВОМ СТОЛБЦЕ.
Поэтому если Вы копируете диапазон, где в ячейках первого столбца есть пустые, то lr определится не правильно и следующая запись наложится на предыдущую. Об этом, к стати, всё расписано в том топике, откуда Вы брали фрагмент. Вы дальше первого топика читали? Ну, например, ЭТО.

Приложите пример. Тогда кто-нибудь попробует разобраться почему у Вас не работает. (Я не смогу — на работе завал, да ещё и сисадмины закрыли скачивание файлов с макросами, собаки!) Alex_ST

Сообщение Ну вот, зарегистрировались, теперь можно и попытаться разобраться.

У меня на моих файлах работает. Но у меня макрос уже «допиленный»
Проблема может быть в структуре данных.
Например, в приведённом Вами фрагменте кода
lr = wb.Sheets(1).Cells(Rows.Count, 1).End(xlUp).Row определяет ряд с первой пустой ячейкой В ПЕРВОМ СТОЛБЦЕ.
Поэтому если Вы копируете диапазон, где в ячейках первого столбца есть пустые, то lr определится не правильно и следующая запись наложится на предыдущую. Об этом, к стати, всё расписано в том топике, откуда Вы брали фрагмент. Вы дальше первого топика читали? Ну, например, ЭТО.

Приложите пример. Тогда кто-нибудь попробует разобраться почему у Вас не работает. (Я не смогу — на работе завал, да ещё и сисадмины закрыли скачивание файлов с макросами, собаки!) Автор — Alex_ST
Дата добавления — 26.03.2013 в 12:39

Как файл из Эксель сохранить в ПДФ: 4 основных способа

Способов, как сохранить Эксель в ПДФ, так много, что воспользоваться ими может и владелец компьютера с современным программным обеспечением, и пользователь старого ПК, на котором даже нет пакета MS Office.

Как файл из Эксель сохранить в ПДФ: 4 основных способа

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

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

Конвертация в программе Excel

Разработчики офисного пакета приложений MS Office постоянно добавляют в него новые функции. И в современных версиях, начиная с 2010 года, с помощью редактора Excel можно сразу переводить документы в множество различных форматов, без применения дополнительных приложений.

Источник

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

Конечно, вы можете скопировать выбранные диапазоны на новый рабочий лист и сохранить его как файл PDF; или сохраните каждый рабочий лист отдельно в виде файлов PDF. Но здесь мы покажем вам сложный способ быстро сохранить выделенные фрагменты или всю книгу в виде одного файла PDF в Microsoft Excel и одновременно сохранить несколько книг в указанной папке в отдельные файлы PDF.

Сохранение выделенного фрагмента или отдельной книги в формате PDF с помощью функции «Сохранить как»

Легко сохранить выбор в формате PDF с помощью Kutools for Excel

Сохраните каждый рабочий лист как отдельный файл PDF в рабочей книге сразу с помощью Kutools for Excel

Сохранение выделенного фрагмента или отдельной книги в формате PDF с помощью функции «Сохранить как»

Шаг 1: Выберите диапазоны, которые вы сохраните как файл PDF.

Если вы хотите сохранить всю книгу как один файл PDF, просто пропустите этот шаг.

Шаг 2: нажмите Файл > Сохранить как.

Шаг 3. В диалоговом окне «Сохранить как» выберите PDF элемент из Сохранить как: раскрывающийся список.

выстрел-сохранить-PDF-1

Шаг 4: нажмите Опции… в нижней части диалогового окна «Сохранить как».

выстрел-сохранить-PDF-2

Шаг 5. В диалоговом окне «Параметры» установите флажок Выбор Вариант или Вся книга в зависимости от ваших потребностей.

выстрел-сохранить-PDF-3

Шаг 6: нажмите OK чтобы закрыть диалоговые окна.

Затем выбранный диапазон или вся книга сохраняется как один файл PDF.

Легко сохранить выбор в формате PDF с помощью Kutools for Excel

В этом разделе будут представлены что собой представляет Диапазон экспорта в файл полезности Kutools for Excel, это может помочь вам легко сохранить выбранный диапазон в виде файла PDF. Пожалуйста, сделайте следующее.

1. Выберите диапазон, который вы хотите сохранить как файл PDF, и нажмите Кутулс Плюс> Импорт / Экспорт > Диапазон экспорта в файл. Смотрите скриншот:

2. в Диапазон экспорта в файл диалоговое окно, вам необходимо:

A: Выбрать PDF вариант в Формат файла раздел;

B: Если вы хотите сохранить выделенное форматирование, высоту строк и ширину столбцов, проверьте Сохранить форматирование / высота рядов / ширина столбца вариантов в Параметры книги раздел;

C: Щелкните значок кнопка для выбора папки для сохранения файла PDF;

D: Щелкните значок OK кнопку.

Внимание: Если вы хотите напрямую открыть файл PDF после экспорта, проверьте Откройте файл после экспорта пунктом.

3. Теперь еще один Диапазон экспорта в файл появится диалоговое окно, введите имя файла PDF в поле, затем щелкните значок OK кнопку.

Теперь выделение успешно сохранено как файл PDF.

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

Сохраните каждый рабочий лист как отдельный файл PDF в рабочей книге сразу с помощью Kutools for Excel

Yвы можете сохранить каждый рабочий лист или конкретный рабочий лист в книге как отдельный файл PDF с Разделить книгу утилита.

1. Нажмите Кутулс Плюс > Workbook > Разделить книгу. Смотрите скриншот:

2. в Разделить рабочий лист диалоговом окне, проверьте рабочие листы, которые необходимо сохранить как отдельные файлы PDF в Имя рабочего листа коробка, в Опции раздел, проверьте Сохранить как поле и выберите PDF (* .pfd) из раскрывающегося списка, а затем щелкните Трещина кнопка. В всплывающем Найдите папку в диалоговом окне выберите папку для сохранения этих файлов PDF и, наконец, щелкните значок OK кнопка. Смотрите скриншот:

Затем все выбранные рабочие листы сразу сохраняются как отдельный файл PDF.

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

Демонстрация: сохраните выбор или каждый рабочий лист в формате PDF с помощью Kutools for Excel

Статьи по теме:

  • Экспорт выделения Excel как HTML
  • Экспорт выделения Excel в текстовые файлы
  • Экспорт выделенного из Excel в файлы CSV
  • Сохранить выделение Excel как отдельный файл
  • Преобразование диапазонов Excel в изображения

Лучшие инструменты для работы в офисе

Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%

  • Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
  • Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон…
  • Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны…
  • Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
  • Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии…
  • Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
  • Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF…
  • Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.

вкладка kte 201905

Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!

офисный дно

Источник

Сохранение выделеного в файл

aydar

 Дата: Пятница, 22.03.2013, 12:34 |
Сообщение № 1

Добрый день, есть список, его сотрудники пополняют и в конце рабочего дня они выделяют все записи за день и нажимаю кнопку, запись выделенного (на нем макрос)
суть макроса копирование выделенной области на др лист (уже сделал) и копирование выделенных данных в отдельный файл и его пополнение (не сделал) и хочу еще отчищать раб область (лист куда сотрудники в течение дня вводят записи). Очень нужна ваша помощь Макросы эксель только начал изучать.

вот код макроса, копия на др лист

[vba]

Код

Selection.Copy
Sheets(«База данных»).Select
Range(«A1»).Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
ActiveWorkbook.Save
Sheets(«Исходные данные»).Select
Selection.ClearContents
Range(«A3»).Select

[/vba]
 

Ответить

aydat

 Дата: Пятница, 22.03.2013, 12:37 |
Сообщение № 2

вот ссылка на исходный файл
http://files.mail.ru/377697DEDBE945D88048EB1788797111
 

Ответить

Alex_ST

 Дата: Пятница, 22.03.2013, 13:02 |
Сообщение № 3

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

Ранг: Участник клуба

Сообщений: 3176


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

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


2003

Ваш файл не смотрел (у меня на работе сисадмины, собаки, скачивать файлы с макросами запретили).
Но посмотрите, в топике Макрос «Copy_ROWs_to_EXT_FILE» не то, что Вам нужно?


С уважением,
Алексей
MS Excel 2003 — the best!!!

 

Ответить

aydar

 Дата: Пятница, 22.03.2013, 13:20 |
Сообщение № 4

помоему то, а как делать очистку листа с определенной строки
 

Ответить

Alex_ST

 Дата: Пятница, 22.03.2013, 13:24 |
Сообщение № 5

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

Ранг: Участник клуба

Сообщений: 3176


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

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


2003

Выделить ячейку, Ctrl+Shift+End, Delete


С уважением,
Алексей
MS Excel 2003 — the best!!!

 

Ответить

aydar

 Дата: Пятница, 22.03.2013, 13:43 |
Сообщение № 6

понял вас, значит так по скрипту вашему

[vba]

Код

If Not TypeName(Selection) = «Range» Then Exit Sub
Dim lr&, wb As Workbook, lb As Workbook
With Application: .ScreenUpdating = False: .DisplayAlerts = False: .EnableEvents = False: End With
Set wb = GetObject(«c:test.xls») ‘путь к файлу-накопителю
Set lb = ThisWorkbook
lr = wb.Sheets(1).Cells(Rows.Count, 1).End(xlUp).Row
Selection.EntireRow.Copy wb.Sheets(1).Cells(lr + 1, 1)
wb.Close (True) ‘ закрыть с сохранением
With Application: .EnableEvents = True: .DisplayAlerts = True: .ScreenUpdating = True: End With
Set wb = Nothing: Set lb = Nothing

[/vba]

копирует замечательно, но копирует всю строку а не выделенную область.

хотел объединить мое копирование в лист и ваше в файл не получилось

[vba]

Код

Sub ЗаписьВОбщийЖурнал()
‘
‘ Макрос2 Макрос
‘ Макрос записан 15.10.2007 (VladimirovAV)
‘

Selection.Copy
Sheets(«База данных»).Select
Range(«A1»).Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
ActiveWorkbook.Save
Sheets(«Исходные данные»).Select
Selection.ClearContents
Range(«A3»).Select

If Not TypeName(Selection) = «Range» Then Exit Sub
Dim lr&, wb As Workbook, lb As Workbook
With Application: .ScreenUpdating = False: .DisplayAlerts = False: .EnableEvents = False: End With
Set wb = GetObject(«c:test.xls») ‘путь к файлу-накопителю
Set lb = ThisWorkbook
lr = wb.Sheets(1).Cells(Rows.Count, 1).End(xlUp).Row
Selection.EntireRow.Copy wb.Sheets(1).Cells(lr + 1, 1)
wb.Close (True) ‘ закрыть с сохранением
With Application: .EnableEvents = True: .DisplayAlerts = True: .ScreenUpdating = True: End With
Set wb = Nothing: Set lb = Nothing

End Sub

[/vba]

отказывается копировать
 

Ответить

RAN

 Дата: Пятница, 22.03.2013, 14:00 |
Сообщение № 7

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

Ранг: Экселист

Сообщений: 5645

Макрос называется копирование строк. Вот он и копирует строки.
Уберите EntireRow — будет копировать выделение.

Быть или не быть, вот в чем загвоздка!

 

Ответить

aydar

 Дата: Понедельник, 25.03.2013, 12:36 |
Сообщение № 8

убрал, не получилось

[vba]

Код

Selection.Copy
Sheets(«Áàçà äàííûõ»).Select
Range(«A1»).Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
ActiveWorkbook.Save
Sheets(«Èñõîäíûå äàííûå»).Select
Selection.ClearContents
Range(«A3»).Select

[/vba]

[vba]

Код

If Not TypeName(Selection) = «Range» Then Exit Sub
Dim lr&, wb As Workbook, lb As Workbook
With Application: .ScreenUpdating = False: .DisplayAlerts = False: .EnableEvents = False: End With
Set wb = GetObject(«c:test.xls») ‘ïóòü ê ôàéëó-íàêîïèòåëþ
Set lb = ThisWorkbook
lr = wb.Sheets(1).Cells(Rows.Count, 1).End(xlUp).Row
Selection.Copy wb.Sheets(1).Cells(lr + 1, 1)
wb.Close (True) ‘ çàêðûòü ñ ñîõðàíåíèåì
With Application: .EnableEvents = True: .DisplayAlerts = True: .ScreenUpdating = True: End With
Set wb = Nothing: Set lb = Nothing

[/vba]
[admin]aydar,оформляйте коды тегами и копируйте их из VBA при русской раскладке[/admin]
 

Ответить

aydar

 Дата: Вторник, 26.03.2013, 11:36 |
Сообщение № 9

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

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

Сообщений: 2


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

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


Цитата

Sub ЗаписьВОбщийЖурнал()
‘
‘ Макрос2 Макрос

Selection.Copy
Sheets(«База данных»).Select
Range(«A1»).Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
ActiveWorkbook.Save
Sheets(«Исходные данные»).Select
Selection.ClearContents
Range(«A3»).Select

‘это часть работает замечательно

‘ это копирования выделения в другой файл
If Not TypeName(Selection) = «Range» Then Exit Sub
Dim lr&, wb As Workbook, lb As Workbook
With Application: .ScreenUpdating = False: .DisplayAlerts = False: .EnableEvents = False: End With
Set wb = GetObject(«c:test.xls») ‘путь к файлу-накопителю
Set lb = ThisWorkbook
lr = wb.Sheets(1).Cells(Rows.Count, 1).End(xlUp).Row
Selection.Copy wb.Sheets(1).Cells(lr + 1, 1)
wb.Close (True) ‘ закрыть с сохранением
With Application: .EnableEvents = True: .DisplayAlerts = True: .ScreenUpdating = True: End With
Set wb = Nothing: Set lb = Nothing

End Sub

копирование в другой файл работает криво, копируется вся строка а не выделение,иногда не все данные копируются
 

Ответить

RAN

 Дата: Вторник, 26.03.2013, 12:07 |
Сообщение № 10

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

Ранг: Экселист

Сообщений: 5645

Во первых — зачем себя цитировать?
Во вторых, такого

Цитата (aydar)

копируется вся строка а не выделение,иногда не все данные копируются

в приведенном коде быть не может.
Единственное, что он может скопировать, это Range(«A3») на листе Исходные данные

Быть или не быть, вот в чем загвоздка!

 

Ответить

KuklP

 Дата: Вторник, 26.03.2013, 12:20 |
Сообщение № 11

Группа: Проверенные

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

Сообщений: 2369


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

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


2003-2010

Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728

 

Ответить

Alex_ST

 Дата: Вторник, 26.03.2013, 12:39 |
Сообщение № 12

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

Ранг: Участник клуба

Сообщений: 3176


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

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


2003

Ну вот, зарегистрировались, теперь можно и попытаться разобраться.

У меня на моих файлах работает. Но у меня макрос уже «допиленный»
Проблема может быть в структуре данных.
Например, в приведённом Вами фрагменте кода
lr = wb.Sheets(1).Cells(Rows.Count, 1).End(xlUp).Row определяет ряд с первой пустой ячейкой В ПЕРВОМ СТОЛБЦЕ.
Поэтому если Вы копируете диапазон, где в ячейках первого столбца есть пустые, то lr определится не правильно и следующая запись наложится на предыдущую. Об этом, к стати, всё расписано в том топике, откуда Вы брали фрагмент. Вы дальше первого топика читали? Ну, например, ЭТО.

Приложите пример. Тогда кто-нибудь попробует разобраться почему у Вас не работает. (Я не смогу — на работе завал, да ещё и сисадмины закрыли скачивание файлов с макросами, собаки!)


С уважением,
Алексей
MS Excel 2003 — the best!!!

 

Ответить

aydar

 Дата: Вторник, 26.03.2013, 14:30 |
Сообщение № 13

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

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

Сообщений: 2


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

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


вопрос решен, спс за помощь
 

Ответить
Источник

Иногда во время работы в Эксель может возникнуть такая неприятная ситуация, как внезапное завершение работы, например, при сбоях в элекросети или системных ошибках. Следствием этого являются несохраненные данные в рабочей книге. Или же, например, сам пользователь вместо кнопки “Сохранить” при закрытии документа случайно может нажать “Не сохранять”.

Но не стоит расстраиваться, если вдруг данные не удалось записать, ведь несохраненный документ Excel можно восставить, и в этой статье мы расскажем, как это сделать.

Содержание

  1. Механизм восстановления данных
    • Метод 1: восстановление данных после сбоя
    • Метод 2: восстановление несохраненного документа
    • Метод 3: ручное восстановление несохраненных данных
  2. Заключение

Механизм восстановления данных

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

На самом деле, автосохранение в Эксель должно быть включено по умолчанию, но не лишним будет проверить, действительно ли это так, чтобы исключить возможные проблемы в дальнейшем.

  1. Запускаем меню “Файл”, кликаем по разделу “Параметры”.Переход в Параметры Эксель
  2. Переходим в раздел “Сохранение”:
    • в правой части окна проверяем наличие установленного флажка напротив пункта “Автосохранение”. По умолчанию задана периодичность сохранения – через каждые 10 минут. Мы можем изменить это значение на свое усмотрение.
    • также проверяем наличие галочки напротив пункта “Сохранять… при закрытии без сохранения”. Настройка автосохранения в параметрах Эксель
  3. По готовности жмем кнопку OK.

Метод 1: восстановление данных после сбоя

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

  1. Для начала нужно вернуть компьютер в полностью рабочее состояние, снова запустить программу Эксель и открыть документ, над которым мы работали.
  2. В окне программы слева появится раздел, с помощью которого можно восстановить документ. Все, что нам нужно сделать – это щелкнуть по нужной версии книги (если их несколько).Восстановленные документы в ЭксельПримечание: Если работа ведется на ноутбуке, то вероятно, после выключения питания и очередного запуска, система автоматически откроет все окна запущенных программ, в том числе, Excel с уже восстановленным документом (при определенных настройках электропитания ноутбука).Автоматическое восстановление документа в Excel
  3. В результате программа вернет несохраненные данные (с учетом периодичности автосохранения). После этого сохраняем документ. Сделать это можно, нажав на значок в виде дискеты в левом верхнем углу окна программы или меню “Файл” (пункт – “Сохранить” или “Сохранить как”).Выбор версии восстановленного документа в Excel
  4. В правой части окна кликаем по кнопке “Обзор” (в некоторых версиях программы данное действие не требуется и программа сразу открывает окно сохранения).Сохранение документа в Эксель
  5. На экране появится окно, где мы можем сохранить документ. Указываем путь, даем название файлу, при необходимости меняем расширение, после чего нажимаем “Сохранить“.Сохранение файла в Excel
  6. Все готово. С помощью действий выше нам удалось выполнить восстановление данных и сохранить их.

Метод 2: восстановление несохраненного документа

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

Не сохранять изменения в файле при закрытии в Excel

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

  1. Повторно открываем Эксель и переходим в меню “Файл”.
  2. Кликаем по разделу “Открыть” в боковом меню слева. В правой части окна щелкаем по кнопке “Последние” и в списке справа внизу жмем кнопку “Восстановить несохраненные книги”.Восстановление несохраненной книги в ЭксельТакже можно в меню “Файл” перейти в раздел “Сведения” (активная только при каком-либо открытом файле), где щелкаем по кнопке “Управление книгой” и выбираем “Восстановить несохраненные книги”.Восстановление несохраненной книги в Excel
  3. После этого откроется окно с перечнем несохраненных книг в папке “UnsavedFiles”, где выбираем нужный документ (если их несколько) и открываем его. Ориентируемся на дату изменения документа.Открытие несохраненного документа в Эксель
  4. После того, как программа восстановит документ, о чем будет свидетельствовать соответствующая информационная панель, нажимаем кнопку “Сохранить как”. Сохранение восстановленной книги в Excel
  5. Даем имя файлу, выбираем расширение, определяем место сохранения и щелкаем кнопку “Сохранить”.Сохранение восстановленной книги в Эксель
  6. Вот и все, что требовалось сделать для восстановления и сохранения фала.

Метод 3: ручное восстановление несохраненных данных

Иногда пользователи, выполняя шаги, описанные во втором методе могут столкнуться с тем, что папка “UnsavedFiles” пустая. Дело в том, что в указанную папку попадают только документы, которые ни разу пользователем не сохранялись.

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

Не сохранять изменения в файле перед его закрытием в Excel

Алгоритм действия для восстановления документа в этом случае следующий:

  1. Переходим в меню “Файл”, затем – в раздел “Параметры”.Переход в параметры Excel
  2. В подразделе “Сохранение” копируем адрес каталога данных, указанного в параметрах автосохранения.Папка для автосохранения данных в параметрах Эксель
  3. Открываем Проводник (например, нажатием клавиш Win+I), вставляем скопированный путь в адресную строку и жмем Enter. После этого мы окажемся в папке с автосохранениями документов Excel. Открываем нужную папку, в названии которой присутствуют фрагменты из имени требуемого файла.Папка для автосохранения данных Эксель
  4. Здесь мы видим перечень книг, которые программа сохранила в автоматическом режиме. Открываем последнюю версию файла (ориентируемся на дату сохранения документа).Открытие автосохраненной книги Excel
  5. После запуска файла программа проинформирует нас о том, что это восстановленный несохраненный файл. Щелкаем кнопку “Восстановить”, затем подтверждаем действие нажатием кнопки OK в появившемся небольшом окошке.Сохранение восстановленного автосохраненного файла в Эксель
  6. Все готово, мы заменили последнюю сохраненную версию файла документом, который только что открыли.

Заключение

Наверняка, многие пользователи при работе на компьютере и в Эксель, в частности, сталкивались с такой неприятной ситуацией, как несохраненные данные в документе, которая может возникнуть по ряду причин. Но расстраиваться не стоит, ведь, в большинстве случаев данные можно восстановить благодаря такой полезной функции, как “Автосохранение”. Главное – чтобы она была включена в параметрах программы, о чем лучше позаботиться сразу же после ее установки.

Источник

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

Microsoft страхует пользователей Word и Excel многократными предупреждениями по типу «Вы точно хотите закрыть несохранённый документ?». Проигнорировать их сложно, но бывает всякое: отключилось электричество, не уследили за зарядкой ноутбука и т.п. Для таких случаев предусмотрено автосохранение.

Как правило, интервал сохранения составляет 10 мин. Вы можете подкорректировать время. Например, разрешить программе делать копии каждую минуту или две. Проверить функцию в программе версии 2003 можно так:

Совет. Частое автосохранение может стать причиной торможения работы маломощных ПК. В таком случае подберите наиболее удобный опытным путём.

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

​Смотрите также​ должна будет знать,​Другие файлы в​ (нужно добавить в​ чего?​Анатолий зинченко​ сохранить этот файл,​ бы один раз.​небольшое число, например​Установите флажок​>​ Это делается путем​укажите частоту автоматического​ из папки автовосстановления​ Word и PowerPoint​ несохраненных книг. Нам​

​ какой из открытых​ этой папке не​ надстройку отлавливание событий​Заранее спасибо!​: C:Usersимя юзераAppDataRoamingMicrosoftExcel​ нажмите​Несохранённая версия файла открывается​ 5 или 10.​Автосохранение каждые x мин​Сохранение​ выбора соответствующего наименования​ сохранения книг Excel.​

​ нужны. Только один​ других книг).​Гость​Светлана пичугина​Сохранить как​ в режиме только​ Так вы потеряете​.​.​ формата в поле​

​Что такое автосохранение?​ открыть последние. Можно​ 365. Когда Автосохранение​ адресную строку данного​Урок:​ программа периодически сохраняет​ какой нет. Проще​ последний.​В общем-то не​: Только что пришла​: Спасибо!​(Save As) на​ для чтения, при​ только сведения, введенные​В списке​В Outlook откройте вкладку​ параметра​Очень неприятно, когда вследствие​

​1. В Excel-е​​: Самый главный прикол​​В диалоговом окне​ части окна показано​ 5 или 10​укажите, как часто​и выберите пункт​ формате»​ зависания компьютера или​системе поиска​Подробные сведения: возможности Автосохранение?​ являться адресом директории​Немного сложнее дело обстоит​ В случае непредвиденных​Kind_whale​ файла дату и​ нет. Тем более,​​ можно создать простой​​ что Windows скрывает​Сохранение документа​ сообщение о том,​

​ минут.​ необходимо сохранять ваши​Параметры​. По умолчанию это​ другого сбоя, данные,​в разделе «/пользователи/имя_пользователя/Library/поддержка​Более новые версии​ расположения несохраненных книг.​ с книгами, у​ обстоятельств или сбоев​: Получается, что реализовать​ время последнего сохранения.​

С недавними обновлениями в Excel 2016 картина поменялась. Теперь для одновременной работы вы должны сохранить файл в облачное хранилище (OneDrive или SharePoint) и пригласить других пользователей с помощью кнопки Поделиться (Share) в правом верхнем углу окна:

Можно выбрать нужных людей прямо из адресной книги или создать короткую прямую ссылку на документ, нажав на соответствующую команду в правом нижнем углу:

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

По полученной ссылке другие пользователи смогут войти в общий документ и редактировать его одновременно с вами. Вы в реальном времени (задержка 1-2 секунды по ощущениям) сможете видеть кто и в каком месте листа сейчас работает – активные ячейки других пользователей наглядно помечаются цветом и всплывающими подсказками:

Всех участников редактирования также можно увидеть на иконках в правом верхнем углу окна:

И что совсем хорошо – никаких особых ограничений на применение инструментов Excel теперь в этом режиме совместного редактирования нет. Можете смело строить сводные таблицы, диаграммы, фильтровать или сортировать ваши данные и т.д. Единственное условие – файл должен быть в новом формате (xlsx, xlsm, xlsb, а не старый xls) и в книге не должно быть включенной защиты листов или ячеек.

В общем, реализовано все на порядок лучше, чем было в старых версиях.

Переход в настройки

Давайте выясним, как попасть в настройки автосохранения.

  1. Открываем вкладку «Файл». Далее перемещаемся в подраздел «Параметры».

  2. Открывается окно параметров Excel. Кликаем по надписи в левой части окна «Сохранение». Именно тут размещаются все необходимые нам настройки.

Как настроить автосохранение в Excel?

Чтобы настроить автосохранение в Excel 2007нажмите кнопку Office — Параметры Excel — Сохранение — откроется окно настроек автосохранения.

В Excel 2010перейти к автосохранению можно: Файл — Параметры Excel — Сохранение — откроется окно настроек автосохранения.

Время автосохранения

Первая настройка — это вообще включение функции автосохранения и времени сохранения.

Минимальное время — одна минута. Файл будет сохраняться постоянно.

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

ЧаВо:

— Что делать, если не работает автосохранение в Excel?

— Зайдите в настройки сохранения (Файл — Параметры Excel — Сохранение) и поставьте соответствующую галочку (см. выше).

Управление версиями

В каталоге можно удалять устаревшие варианты. А так, под управлением версией можно понимать варианты автоматического восстановления, особенно если их несколько. При этом можно выбирать вариант для удаления и открытия. Делается это так:

  1. При запуске программы выбрать «Показать восстановленные файлы».
  2. Теперь посмотреть на список восстановленных книг.
  3. Здесь можно выбрать:
    • «Открыть» для обычного открытия;
    • «Сохранить как…» для создания новой копии, включающей изменения;
    • «Удалить» для удаления документа;
    • «Показать восстановленные элементы», чтобы узнать какие изменения сохранены в данной версии документа. Актуально если их несколько.

Размещение несохраненных книг

Немного сложнее дело обстоит с книгами, у которых не настроено автосохранение. Адрес места хранения таких файлов через интерфейс Эксель узнать можно только выполнив имитацию процедуры восстановления. Они находятся не в отдельной папке Excel, как в предыдущем случае, а в общей для хранения несохраненных файлов всех программных продуктов пакета Microsoft Office. Несохраненные книги будут располагаться в директории, которая находится по адресу следующего шаблона:

C:Usersимя_пользователяAppDataLocalMicrosoftOfficeUnsavedFiles

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

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

Просто подставьте её в шаблон вместо выражения «имя_пользователя».

Получившийся адрес можно, например, вставить в Проводник, чтобы перейти в нужную директорию.

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

  1. Открываем меню «Пуск». Переходим по пункту «Панель управления».

  2. В открывшемся окне перемещаемся в раздел «Добавление и удаление записей пользователей».

  3. В новом окне никаких дополнительных действий делать не нужно. Вы там можете посмотреть, какие имена пользователей на данном ПК имеются и выбрать подходящее, чтобы использовать его для перехода в директорию хранения несохраненных книг Excel, подставив в шаблон адреса вместо выражения «имя_пользователя».

Как уже говорилось выше, место хранения несохраненных книг можно узнать также, проведя имитацию процедуры восстановления.

  1. Переходим в программе Excel во вкладку «Файл». Далее перемещаемся в раздел «Сведения». В правой части окна жмем на кнопку «Управление версиями». В открывшемся меню выбираем пункт «Восстановить несохраненные книги».

  2. Открывается окно восстановления. Причем оно открывается именно в той директории, где хранятся файлы несохраненных книг. Нам остается только выделить адресную строку данного окна. Именно её содержимое и будет являться адресом директории расположения несохраненных книг.

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

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

Механизм восстановления данных

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

На самом деле, автосохранение в Эксель должно быть включено по умолчанию, но не лишним будет проверить, действительно ли это так, чтобы исключить возможные проблемы в дальнейшем.

  1. Запускаем меню “Файл”, кликаем по разделу “Параметры”.
  2. Переходим в раздел “Сохранение”:
    • в правой части окна проверяем наличие установленного флажка напротив пункта “Автосохранение”. По умолчанию задана периодичность сохранения – через каждые 10 минут. Мы можем изменить это значение на свое усмотрение.
    • также проверяем наличие галочки напротив пункта “Сохранять… при закрытии без сохранения”.
  3. По готовности жмем кнопку OK.

Отключить авто сохранение

Полностью отменить работу автосохранения можно в том же разделе параметров.

Нужно или выставить интервал равный максимально допустимому значению (120 минут, что при работе с документом по 15-20 минут почти равно отключению опции) или сняв галочку в указанном поле. При снятии галочки отменяется любое резервное копирование, и он может быть повреждён или утрачен безвозвратно.

Примечание! Строка «сохранять последнюю версию при закрытии» отвечает за создание копий документа, если от их сохранения было решено отказаться. Не рекомендуется убирать её, хотя это и сэкономит место на жёстком диске (на самом деле это вызовет безвозвратное удаление документов при случайном выключении компьютера).

Как включить автосохранение в Excel

Чтобы сделать автосохранение в Excel через заданный промежуток времени, следует выполнить следующее:

  1. Выберите «Файл»-«Параметры»-«Сохранение».

  2. В разделе «Сохранение книг», нужно поставить галочкой в пункт «Автосохранение». И укажите интервал периодичности автоматического сохранения документов.
  3. Так же важно отметить пункт: «Сохранять последнюю автосохраненную версию при закрытии».
  4. Можно задать путь к желаемой папке, где будут сохраняться документы после автовосстановления.
  5. После всех изменений подтверждаем нажатием кнопки «ОК» .

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

Таким образом, если Вы забыли сохранить изменения в документе, а Ваш компьютер дал сбой (по любой причине), то будут утеряны только данные, проделаны на протяжении последних 10 минут (при настройках по умолчанию). Поэтому, в настройках лучше уменьшить значение данного параметра хотя-бы на 5 минут.

Как открыть автосохраненные файлы?

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

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

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

После завершения работы с сохраненными файлами Excel спросит, нужно ли их хранить дальше или нет. Если они больше не нужны, то нажмите “Не сохранять”, если нужны или вы сомневаетесь, то сохраните в своей рабочей папке как копию документа.

Прочие параметры

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

Разберем их подробнее по указанным на скриншоте выше номерам:

  1. Это место хранения указанных резервных копий. Из этого места подтягиваются автоматические копии файла при нештатном завершении работы, влекущем за собой восстановление документа.
  2. Изменяет вид таблицы восстановления, делая её или «с элементами предварительного просмотра» или «классической». Разницы в том, насколько проще понять какая версия нужна.
  3. Не относится к «автосохранению». Является компонентом для обычного. При сохранении сразу выбирается место хранения на компьютере, а не облако.
  4. Дублирует предыдущую опцию фокусируясь на сохранении данных сразу на компьютере. Пропускает этап выбора носителя для сохранения.
  5. Указывает куда первым делом направлен «Проводник» при сохранении на компьютере. Удобно, если рабочим является каталог, отличный от стандартного «Документы».
  6. Запрещает автоматически восстанавливать выбранную (активную) книгу. Резервные копии всё равно создаются и могут быть найдены по указанному пути.

Все способы расчета процента в Microsoft Excel – формулы и примеры использования

Изменение других настроек

Кроме того, в разделе настроек можно изменить ещё ряд других параметров, хотя без лишней надобности их не советуют трогать. Прежде всего, можно определить в каком формате файлы будут сберегаться по умолчанию. Это делается путем выбора соответствующего наименования формата в поле параметра «Сохранять файлы в следующем формате». По умолчанию это Книга Excel (xlsx), но имеется возможность смены этого расширения на следующие:

  • Книга Excel 1993 – 2003 (xlsx);
  • Книга Excel с поддержкой макросов;
  • Шаблон Excel;
  • Веб-страница (html);
  • Простой текст (txt);
  • CSV и многие другие.

В поле «Каталог данных для автовосстановления» прописывается путь, где хранятся автосохраненные копии файлов. При желании этот путь можно изменить вручную.

В поле «Расположение файлов по умолчанию» указывается путь к директории, в которой программа предлагает хранить оригинальные файлы. Именно эта папка открывается, когда вы жмете на кнопку «Сохранить».

восстановление данных после сбоя

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

  1. Для начала нужно вернуть компьютер в полностью рабочее состояние, снова запустить программу Эксель и открыть документ, над которым мы работали.
  2. В окне программы слева появится раздел, с помощью которого можно восстановить документ. Все, что нам нужно сделать – это щелкнуть по нужной версии книги (если их несколько).Примечание: Если работа ведется на ноутбуке, то вероятно, после выключения питания и очередного запуска, система автоматически откроет все окна запущенных программ, в том числе, Excel с уже восстановленным документом (при определенных настройках электропитания ноутбука).
  3. В результате программа вернет несохраненные данные (с учетом периодичности автосохранения). После этого сохраняем документ. Сделать это можно, нажав на значок в виде дискеты в левом верхнем углу окна программы или меню “Файл” (пункт – “Сохранить” или “Сохранить как”).
  4. В правой части окна кликаем по кнопке “Обзор” (в некоторых версиях программы данное действие не требуется и программа сразу открывает окно сохранения).
  5. На экране появится окно, где мы можем сохранить документ. Указываем путь, даем название файлу, при необходимости меняем расширение, после чего нажимаем “Сохранить“.
  6. Все готово. С помощью действий выше нам удалось выполнить восстановление данных и сохранить их.

Настройки авто сохранения

Автоматически сохраняется документ в указанный по умолчанию путь с интервалом в 10 минут. Изменить как место хранения, так и интервал между сохранениями можно с помощью настроек приложения. Найти её кажется сложной задачей, но так только кажется. Всё скрыто во вкладке «Параметры».

Расположение настроек

Выше уже упомянуто, что искать автосохранение следует в разделе «параметры». Попробуем уточнить расположение конфигурации резервного копирования при работе с ним в редакторе Excel:

  1. Открыть «Файл».
  2. Выбрать раздел «Параметры».
  3. Перейти во вкладку «Сохранение».
  4. Здесь, в правой части окна и расположены необходимые настройки.

Основные настройки

Ключевой настройкой автосохранения является смена интервала. В зависимости от указанного параметра периодически Excel будет игнорировать команды, выполняя резервное копирование документа. Чем больше документ и слабее компьютер, тем дольше проводится эта процедура. В среднем она занимает 5 секунд для довольно громоздких формул на 4 листах.

Поменять этот параметр можно указав интервал в поле автосохранения. По умолчанию он установлен в 10 минут. Если работать предстоит с файлами, целостность которых крайне важна, то лучше изменить параметр до 3-5 минут.

Восстановить предыдущую версию файла Excel с помощью функции автоматического восстановления

Авто-восстановление и автосохранение являются встроенными функциями в Excel. И если вы настроили его, вы можете восстановить файл Excel, сохраненный или несохраненный. Помните, что функция автоматического восстановления работает только с книгами, которые были сохранены хотя бы один раз.

Шаг 1Убедитесь, что вы настроили функции «Автосохранение» и «Автосохранение» в «Файл»> «Параметры»> «Сохранить».

Шаг 2: Чтобы восстановить предыдущую версию файла Excel без сохранения, откройте вкладку «Файл» и перейдите к «Открыть» с левой боковой панели. Вы можете нажать «Недавние рабочие книги», чтобы отобразить все файлы Excel, которые вы недавно открыли.

Шаг 3: Прокрутите вниз и выберите «Восстановить несохраненные книги» внизу. Затем предыдущая версия книги откроется в Excel и предложит сохранить ее. Нажмите кнопку «Сохранить как» на желтой панели предупреждений, чтобы сохранить предыдущую книгу на свой компьютер.

Другие продукты Microsoft Office, такие как Word, PowerPoint и т. Д., Также оснащены этой функцией. Вы можете легко восстановить документ Word, Презентации PowerPoint и т. Д. Таким образом

ручное восстановление несохраненных данных

Иногда пользователи, выполняя шаги, описанные во втором методе могут столкнуться с тем, что папка “UnsavedFiles” пустая. Дело в том, что в указанную папку попадают только документы, которые ни разу пользователем не сохранялись.

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

Алгоритм действия для восстановления документа в этом случае следующий:

  1. Переходим в меню “Файл”, затем – в раздел “Параметры”.
  2. В подразделе “Сохранение” копируем адрес каталога данных, указанного в параметрах автосохранения.
  3. Открываем Проводник (например, нажатием клавиш Win+I), вставляем скопированный путь в адресную строку и жмем Enter. После этого мы окажемся в папке с автосохранениями документов Excel. Открываем нужную папку, в названии которой присутствуют фрагменты из имени требуемого файла.
  4. Здесь мы видим перечень книг, которые программа сохранила в автоматическом режиме. Открываем последнюю версию файла (ориентируемся на дату сохранения документа).
  5. После запуска файла программа проинформирует нас о том, что это восстановленный несохраненный файл. Щелкаем кнопку “Восстановить”, затем подтверждаем действие нажатием кнопки OK в появившемся небольшом окошке.
  6. Все готово, мы заменили последнюю сохраненную версию файла документом, который только что открыли.

Как восстановить файл Excel, который был сохранен (Отменить изменения)

Когда вы создаете или открываете файл Excel, Office также запускает временный файл, в котором хранятся все изменения. И прежде чем закрыть файл Excel, временный файл позволяет отменить, повторить или повторить изменения листа в любое время. Другими словами, если ваша рабочая книга еще открыта, вы можете использовать функцию отмены, чтобы удалить ошибки и вернуть ваши данные.

Шаг 1: Когда вы обнаружили, что ваш лист исчез, оставьте книгу открытой и найдите ее на самой верхней ленте.

Шаг 2: Нажимайте кнопку «Отменить» со значком стрелки влево, пока файл не вернется к предыдущей версии.

Если вы не можете найти кнопку «Отменить» в верхней части окна, нажмите «Ctrl + Z», чтобы отменить изменения. Это самый простой способ восстановить предыдущую версию Excel, но обязательным условием является то, что файл все еще открыт.

Как восстановить несохранённый документ в excel 2010 и 2013

В Excel 2010 и 2013 разработчики внедрили опцию Версия, которая отвечает за:

  • автосохранение рабочих книг;
  • сохранение закрытых без Save файлов как черновиков.
 

Восстановление документа в Еxcel 2010 и 2013

Программа и создаёт разные типы версий одного документа. Найти их все можно в разделе Файл, строка Сведения. Чтобы восстановить одну из предыдущих версий файла (например, если не сохранили текущую), можно кликнуть по одной из строк списка.

Внимание! Открытие предыдущей копии не приводит к замене текущей. Вы откроете фактически другой документ. Объединение можно произвести вручную.

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

  1. Откройте тот же документ.
  2. Войдите в меню Файл, далее — Сведения.
  3. Найдите в окне Версии кнопку Управление.

Выберите восстановление несохранённых документов. Программа предложит вам несколько вариантов. Их можно посмотреть и выбрать. Неиспользованные черновики хранятся 4 суток. Периодичность автоматического сохранения копий в этих версиях настраивается, как и в более старых.

Источники

  • https://www.planetaexcel.ru/techniques/12/3973/
  • https://9726552.ru/gde-lezhat-fajly-avtosohranenija-excel/
  • https://kakhack.ru/texnologii/soft/kak-vosstanovit-fajly-excel.html
  • https://my-excel.ru/voprosy/kak-najti-avtosohranennyj-fajl-excel.html
  • https://lumpics.ru/how-to-set-autosave-in-excel/
  • https://pedsovet.su/excel/5659_avtosohranenie_excel
  • http://composs.ru/kak-vklyuchit-funkciyu-avtosoxraneniya-v-excel/
  • https://lumpics.ru/where-are-temporary-files-excel/
  • https://MicroExcel.ru/vosstanovlenie-nesohranennoj-knigi/
  • https://exceltable.com/vozmojnosti-excel/kak-nastroit-avtosokhranenie
  • https://www.apeaksoft.com/ru/recovery/recover-an-excel-file.html
Источник

Понравилась статья? Поделить с друзьями:

А вот еще интересные статьи:

  • Excel составьте таблицу значений функции
  • Excel составной адрес ячейки
  • Excel составное условие если
  • Excel составная формула если
  • Excel составление таблиц с формулами

    • 0 0 голоса
    Рейтинг статьи
    Подписаться
    Уведомить о
    guest

    0 комментариев
    Старые
    Новые Популярные
    Межтекстовые Отзывы
    Посмотреть все комментарии