Восстановить экселевский файл

Добрый день! Уважаемые читатели и гости одного из крупнейших IT блогов рунета Pyatilistnik.org. В прошлый раз мы с вами разбирали назначение технологии VLAN, смотрели, как ее применить в вашей локальной сети. Сегодня мы разберем весьма отрешенную от административных задач тему, но не менее жизненную, речь пойдет про создание точки восстановления файлов Excel, и последующее восстановление файла после сохранения.

Описание задачи

Вот согласитесь, что очень часто офисные работники обращаются к вам по вопросам восстановления файлов на нужное время. Логично, что у вас должна быть система резервного копирования, но и она не может делать бэкапы каждые 10 минут, особенно если большие объемы. Пользователь может делать сотни правок в файле, и в какой-то момент осознать, что ему нужно откатиться. Штатными средствами вы не всегда это можете сделать, и из бэкапа не всегда восстановить, если файл еще не успел туда попасть.

Методы восстановления excel файла после сохранения

Существует ряд возможностей, которые смогут вам помочь вернуть потерянную информацию в вашем файле Excel:

Восстановление из снапшота
Восстановление из предыдущей версии
Возвращаем файл средствами самого Excel
Использование истории файлов
Восстановление в облаке

Использование снапшотов в Excel

Те кто из вас сталкивался в своей практике с виртуальной машиной, то наверняка знает, что там есть технология моментальных снимков (снапшотов), я про это рассказывал, но в двух словах это быстрое сохранение состояния работы с удобным откатом при необходимости, очень часто используется в тестовых средах. Как оказалось в MS Excel, так же можно реализовать данный функционал, чем я постоянно пользуюсь. Для включения снимков для файлов Excel. вам необходимо установить бесплатный компонент Kutools for Excel Setup.

Скачать Kutools for Excel Setup с моего сайта или с официального https://www.extendoffice.com/download/kutools-for-excel.html

Установка Kutools for Excel

Хотя установка Kutools for Excel очень простая и тривиальная, я покажу ее для целостности статьи. Запускаем установочный файл. На первом экране мастера инсталляции нажимаем "Далее".

Принимаем лицензионное соглашение.

Указываем, для всех будет доступна утилита или нет.

Задаем каталог установки и нажимаем заветную кнопку.

После завершения инсталляции, выставите галку "Запустить Kutools for Excel".

В результате чего у вас будет запущен Excel, слева вы увидите рабочую область Kutools for Excel и две дополнительные вкладки.

Как создать снапшот в Excel

вам нужно открыть вкладку "KUTOOLS" и выбрать пункт "Snap — Track Snap".

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

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

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

Второй метод восстановить перезаписанный файл excel

Если вы ранее не делали снапшотов вашего файла, да и в принципе не знали, о такой возможности, то можете попробовать восстановить excel файл средствами операционной системы в Windows. В Windows данная функция называется "Предыдущие версии" в десятке есть еще "История файлов".

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

В списке версий файлов вам необходимо найти нужный вам и нажать восстановить.

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

Вас попросят подтвердить восстановление вашего Excel файла.

В итоге файл восстановился на прежнее состояние, проверяем его содержимое.

У вас просто их нет и вы используете самую последнюю версию
У вас не включены точки восстановления системы Windows, если их нет, то и нет возможности восстановить файлы Excel таким методом.
В Windows 10 не включена функция "История файлов", если вы используете ее

Предыдущие версии файлов. Как в Windows 7 восстановить удаленные файлы?

Восстановление файлов Excel при аппаратном сбое оборудования

Ни одно оборудование не застраховано от того, что оно не сбоит, вы можете как-то минимизировать данный процесс, но не более. К примеру у вас мог случиться синий экран смерти dpc watchdog violation, что привело к нештатному завершению всех приложений, среди которых были документы Excel. Начиная с версии 2010, они автоматически сохраняются каждые 10 минут, что дает возможность пользователю ощущать какую-то защиту. В таких ситуациях, когда было некорректное закрытие документа, вам при следующем его открытии покажут, что есть автосохраненные точки, вам покажут время их создания. За это отвечает левый блок "Восстановление документа". Указываем нужную версию.

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

Метод восстановления несохраненной книги Excel

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

Перейдите в раздел "Открыть — Последние книги", в самом низу будет кнопка "Восстановить несохраненные книги".

В итоге у вас откроется путь C:\Users\Администратор\AppData\Local\Microsoft\Office\UnsavedFiles. В данной папке могут находится снимки файла.

Восстановление в облаке

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

Находим в списке версий нужную нам дату, открываем ее.

Если она нас устраивает, то восстанавливаем наш файл. Еще раз большой плюс в онлайн сервисах.

На этом у меня все. мы разобрали варианты, как восстановить перезаписанный файл excel. С вами был Иван Семин, автор и создатель IT блога Pyatilistnik.org.

3 Responses to Как восстановить excel файл после сохранения, за минуту

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

Восстановление перезаписанного или замененного документа Excel/Word

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

Как восстановить случайно перезаписанный документ Word или как восстановить замененный файл Excel? Попробуйте эти два эффективных работающих метода.

Рабочие решения	Пошаговое решение проблемы
Исправление 1. Восстановление перезаписанного Excel файла при помощи функции AutoRecover в MS Office	Вы можете восстановить. Пошаговая инструкция
Исправление 2. Восстановление Excel файла из временных файлов в Windows 10	Восстановление предыдущих. Пошаговая инструкция
Исправление 3. Восстановление предыдущей версии Excel файла или Word документа	Вы можете восстановить предыдущую. Пошаговая инструкция
3 решения восстановления перезаписанных файлов Excel на Mac	Вы можете восстановить замененные. Пошаговая инструкция
Бонусный совет. Восстановление удаленных или поврежденных Word/Excel файлов	Как восстановить потерянные. Пошаговая инструкция

Проблема пользователя: Нечаянно перезаписанный Word документ

Случай 1. "Я нечаянно перезаписал Excel файл и сохранил его, есть ли какие-то возможности как я могу восстановить перезаписанный Excel файл?"

Случай 2. "Знает ли кто-нибудь, как восстановить Word документ, который был перезаписан в Windows 10, 8, или 7? Я заменил документ Word на рабочем столе и сохранил файл. Мне нужно восстановить перезаписанный Word документ!"

Перезапись и замена Excel или Word файла не является большой проблемой для большинства пользователей ПК на Windows. Тем не менее, проблема знакома, но большинство не может найти решение. Итак, что вы можете сделать, если ваш файл Excel или Word будет перезаписан или заменен? Здесь мы предлагаем два надежных метода восстановления перезаписанных файлов Excel или документов Word.

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

Как восстановить перезаписанный Excel файл при помощи встроенного инструмента в Excel

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

Шаг 1. Откройте Exel и нажмите "Файл" ("File") > "Сведения" ("Info"). Выберите "Восстановить несохраненные книги" ("Unsaved Workbooks") из выпадающего списка.

Шаг 2. Выберите несохраненный файл и нажмите на кнопку "Открыть" ("Open").

Шаг 3. Затем выберите "Сохранить как" ("Save As") на панели вверху файла, чтобы восстановить его.

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

Вы можете зайти в папку с временными файлами на вашем ПК с Windows и найти предыдущие версии Excel или Word. Затем откройте и сохраните нужные файлы.

Шаг 1. Откройте папку, в которую Microsoft Office сохраняет временные файлы:

На Windows 10/8/7/Vista: C:\Users\UserName\AppData\Local\Microsoft\Office\UnsavedFiles
На Windows XP: C:\Documents and Settings\Local Settings\Application Data\Microsoft\Office\UnsavedFiles

В пути выше замените UserName на имя пользователя в вашем компьютере.

Шаг 2. Найдите временный файл Excel или документа Word, который вам нужен.

Шаг 3. Откройте целевые файлы и нажмите "Сохранить как" ("Save As"), чтобы восстановить замененный файл Excel или документ Word.

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

Как восстановить предыдущую версию файла Excel или документа Word

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

Шаг 1. Создайте новый Excel/Word файл с таким же именем как и ваш потерянный Excel/Word файл или найдите свой существующий, перезаписанный файл Excel/Word.

Шаг 2. Правой клавишей мышки на Excel или Word файл и выберите "Свойства" ("Properties").

Шаг 3. Откройте вкладку "Предыдущие версии" ("Previous Versions"), найдите и выберите последнюю версию или резервную копию, нажмите "Восстановить" ("Restore").

Вот и все, ваш замененный или перезаписанный файл Excel или Word будет восстановлен с тем же именем.

Как восстановить замененный Excel файл на Mac

Как восстановить случайно замененный файл на Mac? Воспользуйтесь следующими тремя решениями для восстановления перезаписанного файла Excel с помощью Time Machine, AutoSave и облачных резервных копий.

Восстановление предыдущей версии Excel файла через Time Machine

Восстановление замененных файлов из локальных резервных копий — самый простой способ. Пользователи Mac используют Time Machine для постепенного резервного копирования фотографий, видео, документов и других файлов. Используйте его для восстановления замененного файла Excel, если вы включили резервное копирование Time Machine.

Шаг 1. Запустите Time Machine из строки меню на вашем Mac. Затем нажмите на Time Machine, чтобы запустить программу.

Шаг 2. Выберите директорию с перезаписанными файлами.

Шаг 3. Нажмите кнопку "Restore" для восстановления замененных файлов Excel на Mac. Затем все восстановленные файлы снова появятся в своих директориях.

Восстановление перезаписанного Excel файла на Mac через AutoSave

Как и в Windows, в Office на Mac также есть функция автосохранения, которая может автоматически сохранять документы через заданные вами интервалы. Если ваши файлы Word или Excel повреждены или заменены, вы можете использовать файлы AnutoRecovery для их восстановления. Следуйте инструкциям ниже.

Шаг 1. Запустите ваш Mac, откройте "Finder" > "Go" > "Go to Folder".

Шаг 2. Введите ~/Library/Containers/com.microsoft.Excel/Data/Library/Preferences/AutoRecovery и нажмите "Go".

Шаг 3. Выберите файлы, которые вам нужны, и нажмите "Save As" для их восстановления.

Восстановление замененного Excel файла на Mac используя облачные резервные копии

Как восстановить перезаписанные файлы Excel без Time Machine? У вас все еще есть другой способ сделать это с помощью облачных резервных копий, таких как OneDrive, iCloud и Dropbox. Эти облачные сервисы резервного копирования сохраняют историю изменений, внесенных в ваши файлы, позволяя пользователям быстро и легко восстанавливать предыдущие версии файлов.

Здесь мы покажем вам, как восстановить файлы Excel, сохраненные из Dropbox:

Шаг 1. Запустите ваш веб-браузер и откройте dropbox.com. Войдите в свой аккаунт.

Шаг 2. Выберите папку, в которой находятся перезаписанные файлы. Откройте последнюю версию вашего файла.

Шаг 3. Нажмите на три точки в правой панели и выберите "Version history".

Шаг 4. Найдите нужную версию и выберите "Restore".

Бонусный совет: Как восстановить удаленные или потерянные Word/Excel файлы

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

Программа EaseUS File Recovery

Восстановление утерянных или удаленных документов Excel, Word, PPT, PDF и других, пропавших из-за ошибочного удаления, форматирования жесткого диска, потери раздела и т. д.
Восстанавливает поврежденные Excel, Word, PPT и PDF документы совершенно бесплатно
Исправляет поврежденные файлы с различных устройств, включая жесткий диск, USB-накопитель, SD-карту, флэш-накопитель, внешний жесткий диск и т. д.

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

1. Загрузите и установите на свой компьютер EaseUS Data Recovery Wizard.

2. Используйте установленную программу для поиска и восстановления потерянных данных. Выберите раздел диска или папку, из которой "пропали" ваши данные. Затем нажмите кнопку "Сканировать".

3. Когда сканирование будет завершено, найдите в списке результатов нужные вам файлы и папки.

Выберите их и нажмите кнопку "Восстановить". При выборе места для сохранения восстановленных данных не следует использовать тот же диск, который вы сканировали!

Резервное копирование файлов Word/Excel во избежание потери данных

Лучший способ избежать повторной потери документов Excel или Word — создать их резервные копии.

Активизируйте автосохранение в Excel или Word

Шаг 1. Откройте Excel, далее "Файл" ("File") > "Параметры" ("Options") > "Сохранение" ("Save").

Шаг 2. Нажмите на "Автосохранение каждые * минут" ("Save AutoRecover information every * minutes") и "Сохранять последнюю автосохраненную версию при закрытии без сохранения" ("Keep the last autosaved version if I close without saving").

Шаг 3. Нажмите "OK" для сохранения настроек.

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

Хотя Microsoft Office предлагает вам функцию AutoRecover для автоматического резервного копирования несохраненных файлов, она не поможет защитить сохраненный документ. Если у вас есть интеллектуальная резервная копия для сохраненного файла Excel или Word, вы можете восстановить резервную копию, даже если она была перезаписана. В таком случае EaseUS программа для резервного копирования файлов может быть настроена на резервное копирование файлов каждые полчаса. Это полезно:

Для резервного копирования файлов базы данных, которые часто меняются
Для резервного копирования часто обновляемых общих файлов
Чтобы создать несколько точек резервного копирования для восстановления или отката

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

Шаг 1. Нажмите на "выберите данные для резервного копирования" и затем выберите режим резервного копирования среди "Файл", "Диск", "Система" или "Почта" для старта задачи резервного копирования .

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

Шаг 3. Следуйте инструкции на экране для выбора места хранения файла резервной копии. Нажмите "начать резервное копирование" и завершенные задачи резервного копирования будут отображены в стиле карточек в левой части экрана.

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

Часто задаваемые вопросы о случайно перезаписанном Word документе

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

Как мне получить документ Word, который я перезаписал?

Вы можете восстановить перезаписанный Word документ из предыдущих версий:

Откройте документ Word.
Перейдите Файл > Сведения.
В пункте Управление книгой выберите Восстановить несохраненные книги.
В появившемся окне выберите предыдущий файл для восстановления перезаписанного Word документа.

Можно ли вы восстановить файл, который вы сохранили?

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

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

Можно ли отменить сохранение в Word?

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

Сначала выберите текущее содержимое файла и скопируйте его в новый файл. Сохраните этот файл под новым именем.
В исходном файле используйте Ctrl + Z, чтобы отменить до 20 последних изменений. Если при этом будет восстановлено все исходное содержимое, используйте "Сохранить как", чтобы сохранить файл с исходным именем.
Если это не сработает, попробуйте отменить сохранение в Excel или Word с резервной копией.

Как мне отменить замененный файл?

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

Щелкните правой кнопкой мыши на перезаписанный или замененный файл и выберите "Свойства".
Перейдите во вкладку Предыдущие версии.
Если вы хотите просмотреть старую версию, нажмите "Просмотр". Чтобы скопировать старую версию в другое место, нажмите "Копировать. ". Чтобы заменить текущую версию на старую, нажмите "Восстановить".

Последние статьи — Также в программе EaseUS

Скрипт для экспресс-восстановления Excel-файлов после повреждения

Данная заметка предназначен тем, у кого при попытке открыть Excel-файл выдается сообщение об ошибке вида:

В моем случае с такой ошибкой открывался xlsx-файл (далее 1.xlsx), восстановленный с помощью R-Saver после вирусной атаки, подобной «Petya».

После распаковки содержимого файла 1.xlsx в папку "\1" через контекстное меню были выданы следующие ошибки:

Оказалось, что эти служебные файлы имеют нулевой размер. Я проделал аналогичную процедуру с исправным файлом 2.xlsx и скопировал из его папки "\2" ненулевые файлы [Content Types].xml и .rels поверх пустых из "\1". Далее добавил содержимое папки "\1" в архив .zip и переименовал его в 3.xlsx. В результате, файл 3.xlsx уже открылся с корректными данными хотя и с предупреждением:

Для автоматизации проделанных выше процедур был разработан скрипт vbscript, распространяемый «As Is».

Исходный код скрипта ST1 XLSX FIXER v1

option explicit Const THIS SCRIPT NAME = "ST1 XLSX FIXER v1.vbs" Const SUBDIR XLS SRC = "ST1 XLSX FIXER DATA v1" Const SUBDIR OUT = "ST1 XLSX FIXED" Const RES SUFFIX = " fixed ST1 v1" Dim fso: Set fso = CreateObject("Scripting.FileSystemObject") 'если запускаем скрипт автономно if WScript.ScriptName = THIS SCRIPT NAME then if WScript.Arguments.Count > 0 then Dim fname for each fname in WScript.Arguments if fso.GetExtensionName(fname) = "xls" then WScript.Echo "Файлы формата Excel 2003 и ранее (.xls) не поддерживаются" else FixCorruptedExcel fname end if next else WScript.Echo "Для работы перенесите выбранные xlsx-файлы на скрипт" end if end if Set fso = Nothing Sub FixCorruptedExcel(fpath) Dim out dir: out dir = fso.GetParentFolderName(fpath) & "\" & SUBDIR OUT if Trim(out dir) <> "" then 'создание папки результатов If not fso.FolderExists(out dir) Then fso.CreateFolder(out dir) end if End If 'cоздать копию xlsx-файла с расширением .zip Dim extract dir: extract dir = out dir & "\" & fso.GetBaseName(fpath) Dim fpath zip: fpath zip = extract dir & ".zip" fso.CopyFile fpath, fpath zip 'выходной файл Dim fpath fixed: fpath fixed = extract dir & RES SUFFIX & ".xlsx" if fso.FileExists(fpath fixed) then fso.DeleteFile fpath fixed 'распаковка zip UnzipFile fpath zip, extract dir 'удаление zip-файла fso.DeleteFile fpath zip 'восстановление битых файлов из папки Dim script path: script path = fso.GetParentFolderName(Wscript.ScriptFullName) fso.CopyFolder script path & "\" & SUBDIR XLS SRC, extract dir 'создание zip CreateEmptyZipFile fpath zip 'архивирование extract dir Dim shell: set shell = CreateObject("Shell.Application") Dim extract dir obj: set extract dir obj = fso.GetFolder(extract dir) shell.NameSpace(fpath zip).CopyHere shell.NameSpace(extract dir).Items do until shell.namespace(fpath zip).items.count = shell.namespace(extract dir).items.count wscript.sleep 1000 loop 'zip -> xlsx fso.MoveFile fpath zip, fpath fixed 'удаление unzip-папки fso.DeleteFolder extract dir, true WScript.Echo "Исправленный файл: " & vbCrLf & fpath fixed Set shell = Nothing end sub sub UnzipFile(fpath zip, extract dir) 'создание папки для распаковки If not fso.FolderExists(extract dir) Then fso.CreateFolder(extract dir) End If 'извлечение xlsx - аналог операции контекстного меню "Распаковать в . " Dim shell: set shell = CreateObject("Shell.Application") Dim sub files: set sub files = shell.NameSpace(fpath zip).items Const FOF SILENT = &H4& Const FOF RENAMEONCOLLISION = &H8& Const FOF NOCONFIRMATION = &H10& Const FOF ALLOWUNDO = &H40& Const FOF FILESONLY = &H80& Const FOF SIMPLEPROGRESS = &H100& Const FOF NOCONFIRMMKDIR = &H200& Const FOF NOERRORUI = &H400& Const FOF NOCOPYSECURITYATTRIBS = &H800& Const FOF NORECURSION = &H1000& Const FOF NO CONNECTED ELEMENTS = &H2000& Dim args: args = FOF SILENT + FOF NOCONFIRMATION + FOF NOERRORUI shell.NameSpace(extract dir).CopyHere sub files, args Set shell = Nothing end sub sub CreateEmptyZipFile(fname) if fso.FileExists(fname) then WScript.Echo "Файл " & fname & " уже существует", vbCritical, WScript.ScriptFullName end if Const ForWriting = 2 Dim fp: set fp = fso.OpenTextFile(fname, ForWriting, True) fp.Write "PK" & Chr(5) & Chr(6) & String(18, Chr(0)) fp.Close end sub

Дополнительно к скрипту в архиве прилагается папка ST1 XLSX FIXER DATA v1, где лежат эталонные файлы для замещения. Можно изменять ее содержимое в целях расширения области применимости скрипта на другие варианты битых файлов. Например, добавить туда обнаруженные вами варианты нулевых файлов.

Для работы скрипта необходимо:

Скачать и распаковать архив ST1 XSLX FIXER v1.zip в любую папку
Левой кнопкой мыши перенести один или несколько xlsx-файлов на скрипт ST1 XLSX FIXER v1.vbs
Начнется процесс обработки каждого файла:

Сохраняет входной файл неизменным
Создает подпапку ST1 XLSX FIXED
Создает в ST1 XLSX FIXED переименованную в zip копию xlsx
Распаковывает zip в папку и копирует поверх нее ST1 XLSX FIXER DATA v1
Архивирует полученную папку в zip и переименовывает полученный файл в xlsx

Данные эксперимент не претендует на общность использования, используйте предлагаемое решение на свой страх и риск. Со своей стороны планирую провести более широкий эксперимент и по результатам доработать скрипт. Текущее явное ограничение — скрипт не анализирует размер замещаемых файлов при копировании из ST1 XLSX FIXER DATA v1, поэтому не умеет определять, какие именно служебные файлы оказались пустыми и требуют своей замены. Скорее всего, подобный способ применим, если утеряны именно служебные файлы, а не рабочие листы из "\1\xl\worksheets".

Также скрипт не подходит для файлов с расширением xls, созданных в версиях Excel 2003 и ранее, поскольку там используется другой формат хранения данных.

Информационная безопасность
Разработка под Windows

Восстановить экселевский файл

Содержание