Відновлення пошкодженої книги

Відновлення даних, коли книгу відкрито у програмі Excel

• Відновлення останньої збереженої версії книги    Якщо книга пошкоджена під час роботи, але, перш ніж зберігати зміни, можна повернутися до останньої збереженої версії:

  1. Виберіть Файл > Відкрити.

  2. Двічі клацніть ім’я книги, яку ви відкрили в Excel.

  3. Натисніть кнопку Так, щоб повторно відкрити книгу.

     Книга відкриється без жодних змін, які могли спричинити пошкодження книги.

Відновлення даних, якщо не вдається відкрити книгу в програмі Excel

• Вибір ручного режиму як значення параметра обчислення в програмі Excel    Спробуйте змінити параметр обчислення з автоматичного на ручний. Формули в книзі не обчислюватимуться заново, тому вона може відкритися.

  1. Відкрийте вкладку Файл і виберіть команду Створити.

  2. У розділі Створитивиберіть пункт Нова книга.

  3. Клацніть Файл > Параметри.

  4. У категорії Формули в розділі Параметри обчисленнявиберіть пункт Вручнута натисніть кнопку OK.

  5. Виберіть Файл > Відкрити.

  6. Знайдіть і двічі клацніть пошкоджену книгу, щоб відкрити її.

• Використання зовнішніх посилань для зв’язування з пошкодженою книгою    Щоб отримати з книги лише дані без формул і обчислюваних значень, спробуйте створити зв'язок із пошкодженою книгою за допомогою зовнішніх посилань.

  1. Виберіть Файл > Відкрити.

  2. Перейдіть до папки, яка містить пошкоджену книгу.

  3. Клацніть правою кнопкою миші ім'я пошкодженої книги, виберіть команду Копіюватита натисніть кнопку Скасувати.

  4. Відкрийте вкладку Файл і виберіть команду Створити.

  5. У розділі Створитивиберіть пункт Нова книга.

  6. У клітинці A1 нової книги введіть =Ім'я файлу! A1, де Ім'я файлу – це ім'я пошкодженої книги, скопійованої на кроці 3, і натисніть клавішу Enter.

     Примітка.:  Потрібно лише ввести лише ім'я книги, але вводити розширення імені файлу не потрібно.

  7. Якщо з'явиться діалогове вікно Оновлення значень, виберіть пошкоджену книгу та натисніть кнопку OK.

  8. Якщо з’явиться діалогове вікно Вибір аркуша, виберіть потрібний аркуш і натисніть кнопку OK.

  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

     Лічильник = 2

     ' Обчислення кількості рядків даних.

     NumberOfRows = UBound(ActiveChart.SeriesCollection(1). Значення)

     Worksheets("ChartData"). Cells(1;1) = "X Values" (Значення X)

     ' Записування значень на осі X до аркуша.

     З аркушами("ChartData")

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

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

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

     Закінчується на

     ' Loop through all series in the chart and write their values to

     ' the worksheet.

     Для кожної х у ActiveChart.SeriesCollection

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

     З аркушами("ChartData")

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

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

     Application.Transpose(X.Values)

     Закінчується на

     Лічильник = Лічильник + 1

     Next

     End Sub

  2. Вставте або видаліть аркуш у книгу, клацніть правою кнопкою миші вкладку аркуша та перейменуйте його на ChartData.

  3. Виберіть діаграму, з якої потрібно видобути основні значення даних.

     Примітка.: Діаграма може бути вбудованою в аркуш або окремий аркуш діаграми.

  4. Запустіть макрос.

  5. Дані з діаграми буде розташовано на аркуші ChartData.

На початок сторінки