Seviye 1: Yerleşik Çözümler
Aç ve Onar (Open and Repair)
Excel > Dosya > Aç > [Dosya Seç] > Aç butonundaki Oka tıkla > Aç ve Onar... seçeneğini çalıştır.
Onar: Yapıyı kurtarmaya çalışır.
Veri Ayıkla: Saf değerleri çekmeye odaklanır.
Seviye 2: Manuel Baypas
Hesaplama Ayarları
Boş bir Excel açın > Dosya > Seçenekler > Formüller > El ile (Manual) yapın ve bozuk dosyayı tekrar açın.
Seviye 3: Veri Kurtarma Sanatı
Dış Başvuru (Linking) Metodu
Bozuk dosyaya girmeden dışarıdan veri çekme: A1 hücresine =BozukDosyaAdı!A1 yazın ve veri alanını genişletin.
Seviye 4: Teknik Müdahale
VBA Grafik Veri Ayıklama
Sub GetChartValues()
Dim X As Object
Counter = 2
NumberOfRows = UBound(ActiveChart.SeriesCollection(1).Values)
Worksheets("GrafikVerileri").Cells(1, 1) = "X Değerleri"
For Each X In ActiveChart.SeriesCollection
Worksheets("GrafikVerileri").Cells(1, Counter) = X.Name
With Worksheets("GrafikVerileri")
.Range(.Cells(2, Counter), .Cells(NumberOfRows + 1, Counter)) = _
Application.Transpose(X.Values)
End With
Counter = Counter + 1
Next
End Sub
