Excel Makro İle Pivot Tablodaki Formül Kaldırma Hkk

[ridvanucok]

Merhaba,

Excel'de makro ile tüm çalışma tablosundaki formülleri kaldırmak istiyorum. Fakat işlemi gerçekleştiremedim. Konu hakkında değerli yardımlarınızı rica ederim.

 

[Muzaffer Ali]

Merhaba.

Dosyanızda zaten hiç formül yok.

Tüm formülleri kaldırmak için:
Sayfanın tamamını seçip kopyalayın, sağ tıklatın özel yapıştırı seçip değerler'i işaretleyin. Tamamı tıklayın.

 

[ridvanucok]

Merhaba.

Dosyanızda zaten hiç formül yok.

Tüm formülleri kaldırmak için:
Sayfanın tamamını seçip kopyalayın, sağ tıklatın özel yapıştırı seçip değerler'i işaretleyin. Tamamı tıklayın.

Dalgalikur üstadım, ilginiz için teşekkür ederim. Personal Macro Workbook'ta kodları yazdığım için gözükmüyor. Yardımcı olacak kişilerin data oluşturmakla vakit kaybetmemesi için örnek data ekledim. Belirttiğiniz şekilde formülleriN kaldırılabileceğini biliyorum. Fakat makro'da yemiyor. Hata veriyor. Yardımlarınızı rica ederim.

 

[Muzaffer Ali]

Şu kod işinizi görür mü?

Sub Makro1()
    Dim R As Range
    Set R = Selection
    Cells.Select
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    R.Select
End Sub

 

[ridvanucok]

Şu kod işinizi görür mü?

Sub Makro1()
    Dim R As Range
    Set R = Selection
    Cells.Select
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    R.Select
End Sub

Üstadım, tekrar ilginiz için teşekkür ederim.

Aynı kodları daha önce kullandığımda hata vermişti. Sanırım ben yaptığımda bir yerde hata yapmışım. Kodlar çalıştı.

İyi çalışmalar dilerim.

 

[Muzaffer Ali]

Rica ederim. İyi çalışmalar.