Bu dosya, seçilen hücrelerdeki sayısal değerlerin sonuna derece simgesini (°) ekleyen bir makro içerir. Sıcaklık ve açı değerlerinin elle simge eklenmeden hızlıca biçimlendirilmesi için hazırlanmıştır. Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.
Fonksiyon, ThisWorkbook.Name değerini okuyarak dosya adını hücreye yazar.
Dosyanın içeriği
- Sheet1: F2 hücresinde "Resme Tıklat" yazısı, F10 hücresinde dosyanın kendi adını gösteren bir hücre bulunur. Aralık F2:K12 arasındadır.
- Module1: Derece simgesini ekleyen makro ve dosya adını veren fonksiyon burada yer alır.
Kullanılan formüller
F10 hücresinde çalışma kitabının adını döndüren kullanıcı tanımlı fonksiyon çağrılır:=FileName()
Makrolar
- degreeSymbol: Seçili alandaki her hücreyi dolaşır. Hücre boş değilse ve değeri sayısal ise değerin sonuna "°" karakterini ekler. Metin içeren ve boş hücrelere dokunmaz. İşlem hücre değerini kalıcı olarak değiştirir; eklenen simgeden sonra hücre metin olarak saklanır ve hesaplamalarda doğrudan sayı gibi kullanılamaz.
- FileName: Çalışma kitabının adını döndüren fonksiyondur; F10 hücresinde kullanılır.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Derece simgesi eklemek istediğiniz sayıların bulunduğu hücreleri seçin.
- Geliştirici sekmesinden veya Alt+F8 tuşlarıyla degreeSymbol makrosunu çalıştırın.
- Seçili sayıların sonuna ° simgesi eklenir.
- Makroyu kendi dosyanızda kullanmak için Module1 içeriğini VBA düzenleyicisinden kopyalayabilirsiniz.