Merhaba Arkadaşlar
Bir hücredeki formülden elde edilen sayısal değeri "Özel Yapıştır" kullanmadan makro ya da fonksiyonla başka bir hücreye nasıl aktarırım ? Yardımcı olursanız memnun olurum...
Sub formullerin_hepsini_deger_yap()
Dim sayfa As Integer
Dim hucre As Range
'alttaki kod olmazsa ilk sayfanın formülleri kalıyor diğerleri değer oluyor.
On Error Resume Next 'bu kodu ilave edince sayfalarýn hepsini deðer yaptý
For sayfa = 2 To Sheets.Count
For Each hucre In Sheets(sayfa).Cells.SpecialCells(xlCellTypeFormulas)
hucre.Value = hucre.Value
Next
Next
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.