Bu dosya, çalışma sayfasında seçilen hücrelerdeki formülleri sonuç değerlerine çeviren bir makro içerir. Formüllerin yerine yalnızca değerlerin kalması gereken tablolarda kopyala-özel yapıştır adımları olmadan işlem yapılır.
Bu, makro modülünde tanımlı bir özel fonksiyondur. Fonksiyon, ThisWorkbook.Name değerini döndürür ve açık çalışma kitabının adını hücreye yazar.
Dosyanın içeriği
- Sheet1: F2:K10 aralığında kullanılan tek sayfadır. F2 hücresinde "Resme Tıklat" yazısı bulunur; makroyu çalıştırmak için bu alan kullanılır. F10 hücresi dosyanın adını gösterir.
- Module1: ConvertToValues ve FileName adlı iki prosedürü barındıran VBA modülüdür.
Kullanılan formüller
F10 hücresinde dosya adını getiren formül kullanılır:=FileName()
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.- ConvertToValues: Önce "Bu işlemi geri alamazsınız! Öncesinde dosyayı kaydetmek ister misiniz?" mesajını Evet, Hayır ve İptal seçenekleriyle gösterir. Evet seçilirse çalışma kitabı kaydedilir, İptal seçilirse işlem yapılmadan çıkılır, Hayır seçilirse doğrudan devam edilir. Ardından seçili aralıktaki her hücre kontrol edilir; formül içeren hücrelerin formülü, hücrenin değeriyle değiştirilir. Formül içermeyen hücrelere dokunulmaz.
- FileName: F10 hücresindeki formülün kullandığı, çalışma kitabının adını döndüren fonksiyondur.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Formüllerini değere çevirmek istediğiniz hücre aralığını seçin.
- Makroyu çalıştırın (Alt+F8 ile ConvertToValues seçilir ya da sayfadaki "Resme Tıklat" alanı kullanılır).
- Açılan uyarıda dosyayı kaydetmek için Evet, kaydetmeden devam etmek için Hayır, vazgeçmek için İptal seçeneğini kullanın.
- İşlem bitince seçili aralıkta formüllerin yerini değerler alır.