Tüm sayfaları formüllerden kurtarma

[selimonay]

Merhaba Arkadaşlar,

Elimde 20 sayfalık bir excel dosyası var. Tüm sayfalardaki formülleri kurtarıp sadece değerlerin kalmasını istiyorum. en pratik yolu nedir acaba?

 

[systran]

önce belgenizin yedeğini alın.
daha sonra KOPYALA, ÖZEL YAPIŞTIR --> DEĞERLER seçeneğini kullanarak bir makro oluşturun.
bu makroya bir kısayol atayın ve tüm sayfalarınızda çalıştırın.

 

[selimonay]

önce belgenizin yedeğini alın.
daha sonra KOPYALA, ÖZEL YAPIŞTIR --> DEĞERLER seçeneğini kullanarak bir makro oluşturun.
bu makroya bir kısayol atayın ve tüm sayfalarınızda çalıştırın.

Teşekkürler

 

[Mahmut Bayram]

Sub tumformulsil()
    Dim wks As Worksheet

    For Each wks In Worksheets
        On Error Resume Next
        wks.Cells.ClearContents
        On Error GoTo 0
    Next
    Set wks = Nothing
End Sub