Memperbaiki buku kerja yang rusak

Memulihkan data saat buku kerja dibuka di Excel

• Mengembalikan buku kerja ke versi yang terakhir disimpan    Jika buku kerja mengalami kerusakan saat Anda bekerja tapi sebelum Anda menyimpan perubahan yang Anda buat, Anda bisa mengembalikan buku kerja ke versi terakhir yang disimpan:

  1. Klik File > Buka.

  2. Klik ganda nama buku kerja yang Anda buka di Excel.

  3. Klik Ya untuk membuka kembali buku kerja.

     Buku kerja terbuka tanpa adanya perubahan yang Anda buat yang mungkin telah menyebabkan buku kerja tersebut rusak.

Memulihkan data saat Anda tidak bisa membuka buku kerja di Excel

• Mengatur opsi perhitungan di Excel menjadi manual    Cobalah untuk mengubah pengaturan perhitungan dari otomatis ke manual. Karena buku kerja tidak akan dihitung ulang, buku ini mungkin terbuka.

  1. Klik File > Baru.

  2. Di bawah Baru, klik Buku kerja kosong.

  3. Klik File > Opsi.

  4. Di kategori Rumus, di bawah Opsi perhitungan, pilih Manual, lalu klik OK.

  5. Klik File > Buka.

  6. Temukan lalu klik ganda buku kerja yang rusak untuk membukanya.

• Menggunakan referensi eksternal untuk menautkan ke buku kerja yang rusak    Untuk hanya mengambil data dan bukan rumus atau nilai penghitungan dari buku kerja, cobalah menggunakan referensi eksternal untuk menautkan ke buku kerja yang rusak.

  1. Klik File > Buka.

  2. Buka folder yang berisi buku kerja yang rusak.

  3. Klik kanan nama file dari buku kerja yang rusak tersebut, klik Salin, lalu klik Batalkan.

  4. Klik File > Baru.

  5. Di bawah Baru, klik Buku kerja kosong.

  6. Dalam sel A1 buku kerja baru, ketikkan =Nama File!A1. Nama File merupakan nama buku kerja yang rusak, yang Anda salin di langkah 3, lalu tekan Enter.

     Catatan:  Anda harus memasukkan nama buku kerja saja—Anda tidak harus mengetikkan ekstensi nama file.

  7. Jika kotak dialog Perbarui Nilai muncul, pilih buku kerja yang rusak, lalu klik OK.

  8. Jika kotak dialog Pilih Lembar muncul, pilih lembar yang tepat, lalu klik OK.

  9. Pilih sel A1.

  10. Klik Beranda > Salin, atau tekan Ctrl+C.

  11. Pilih sebuah area, dimulai di sel A1 yang kira-kira ukurannya sama seperti rentang sel yang berisi data dalam buku kerja yang rusak.

  12. Klik Beranda > Tempel, atau tekan Ctrl+V.

  13. Dengan rentang sel masih dipilih, klik Beranda > Salin lagi, atau tekan Ctrl+C.

  14. Klik Beranda > panah di bawah Tempel, lalu di bawah Tempelkan Nilai, klik Nilai.

      Menempelkan nilai akan menghapus link ke buku kerja yang rusak dan meninggalkan data saja.

• Menggunakan makro untuk mengekstrak data dari buku kerja yang rusak    Jika bagan tertaut ke buku kerja yang rusak, cobalah menggunakan makro untuk mengekstrak data sumber dari bagan.

  1. Salin kode makro berikut dan tempelkan di lembar modul:

     Sub GetChartValues()

     Dim NumberOfRows As Integer

     Dim X As Object

     Counter = 2

     ' Menghitung jumlah baris data.

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

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

     ' Tulis nilai sumbu x ke lembar kerja.

     With Worksheets("ChartData")

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

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

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

     End With

     ' Ulang melalui semua seri dalam bagan dan menulis nilai seri ke

     ' lembar kerja.

     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. Menyisipkan atau menghapus lembar kerja ke buku kerja Anda dengan mengklik kanan tab lembar tersebut, lalu ganti nama dengan ChartData.

  3. Memilih bagan tempat Anda ingin mengekstrak nilai data yang mendasarinya.

     Catatan: Bagan bisa disematkan ke lembar kerja atau pada lembar bagan terpisah.

  4. Menjalankan makro.

  5. Data dari bagan diletakkan di lembar kerja ChartData.

Atas Halaman