Восстановление поврежденной книги

Восстановление данных, когда книга открыта в Excel

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

  1. Выберите Файл > Открыть.

  2. Дважды щелкните имя книги, которую необходимо открыть в приложении Excel.

  3. Нажмите кнопку Да, чтобы снова открыть книгу.

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

Восстановление данных, если не удается открыть книгу в Excel

• Установка пересчета вручную в Microsoft Excel    Попробуйте отключить автоматический пересчет. Книга не будет пересчитываться и поэтому может открыться.

  1. Выберите Файл > Создать.

  2. В разделе Создать нажмите Пустая книга.

  3. Выберите Файл > Параметры.

  4. На вкладке Формулы в разделе Параметры вычислений выберите параметр Вручную и нажмите кнопку ОК.

  5. Выберите Файл > Открыть.

  6. Найдите поврежденную книгу и откройте ее двойным щелчком мыши.

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

  1. Выберите Файл > Открыть.

  2. Перейдите к папке, в которой находится поврежденная книга.

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

  4. Выберите Файл > Создать.

  5. В разделе Создать нажмите Пустая книга.

  6. В ячейке A1 новой книги введите =имя_файла!A1, где имя_файла — это имя поврежденной книги, скопированное в шаге 3, а затем нажмите клавишу ВВОД.

     Примечание:  Необходимо ввести только имя книги — вводить расширение имени файла не нужно.

  7. Если появится диалоговое окно Обновить значения, выберите поврежденную книгу и нажмите кнопку ОК.

  8. Если появится диалоговое окно Выбор листа, выберите нужный лист, а затем нажмите кнопку ОК.

  9. Выберите ячейку A1.

  10. Выберите Главная > Копировать или нажмите клавиши CTRL+C.

  11. Начиная с ячейки A1, выделите область примерно такого же размера, что и диапазон ячеек с данными в поврежденной книге.

  12. Выберите Главная > Вставить или нажмите клавиши CTRL+V.

  13. Пока диапазон ячеек еще выделен, снова выберите Главная > Копировать или нажмите клавиши CTRL+C.

  14. На вкладке Главная нажмите стрелку под кнопкой Вставить, а затем в группе Вставить значения выберите Значения.

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

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

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

     Sub GetChartValues()

     Dim NumberOfRows As Integer

     Dim X As Object

     Counter = 2

     ' Подсчет количества строк данных.

     NumberOfRows = UBound(ActiveChart.SeriesCollection(1).Values)

     Worksheets("ChartData").Cells(1, 1) = "X Values"

     ' Запись значений по оси x на лист.

     With Worksheets("ChartData")

     .Range(.Cells(2, 1), _

     .Cells(NumberOfRows + 1, 1)) = _

     Application.Transpose(ActiveChart.SeriesCollection(1).XValues)

     End With

     ' Перебор всех рядов в диаграмме и запись их значений

     ' на лист.

     For Each X In ActiveChart.SeriesCollection

     Worksheets("ChartData").Cells(1, Counter) = X.Name

     With Worksheets("ChartData")

     .Range(.Cells(2, Counter), _

     .Cells(NumberOfRows + 1, Counter)) = _

     Application.Transpose(X.Values)

     End With

     Counter = Counter + 1

     Next

     End Sub

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

  3. Выберите диаграмму, из которой необходимо извлечь исходные данные.

     Примечание: Эту диаграмму можно внедрить в лист или поместить на отдельный лист диаграммы.

  4. Запустите макрос.

  5. Данные диаграммы будут помещены на лист ДанныеДиаграммы.

К началу страницы