Hücredeki Fontun Büyüklüğünü Değiştirme isimli içerikte, ilgili işlemin VBA kodları ile nasıl yapacağınızı öğreten bir Hazır Makro Kodu yer almaktadır.
Faydalanılması temennisiyle
Uygulama Adımları
- Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
- Project - VBAProject alanının, ekranın sol tarafında görüldüğünden emin olun. Görünmüyorsa, Ctrl + R kısayolu ile hızlıca açın.
- Araç çubuklarından Insert -> Module yazısına tıklayın.
- Solunda klasör simgesi olan Modules yazısının başındaki + simgesine tıklayın.
- Alt kısma eklenecek gelecek olan Module(1) yazısına çift tıklayın.
- Alttaki kodu yapıştırın.
Hazır Kod
VBA:
You must log in to view content
(13 satır)Açıklama
Range Objesi Ayarlama
rng değişkeni, font boyutunu değiştirmek istediğiniz hücre aralığını belirtmek için kullanılır. Bu örnekte, "Sheet1" çalışma sayfasındaki "A1:A10" aralığı seçilmiştir. İhtiyacınıza göre bu aralığı değiştirebilirsiniz.Font Boyutunu Belirleme
fontSize değişkeni, yeni font boyutunu saklar. Bu örnekte font boyutu olarak 14 belirlenmiştir. İstediğiniz boyutu bu değişkene atayarak kullanabilirsiniz.Font Boyutunu Uygulama
rng.Font.Size özelliği kullanılarak, belirlenen hücre aralığındaki metinlerin font boyutu değiştirilir.Nasıl Kullanılır
- Bu kodu kullanmak için, öncelikle VBA editörünü açın (Excel'de Alt + F11 tuşlarına basarak).
- "Insert" menüsünden "Module" seçeneğini tıklayarak yeni bir modül oluşturun.
- Yukarıda verilen ChangeFontSize subrutinini bu modüle yapıştırın.
- VBA editörünü kapattıktan sonra, Excel'de "Developer" sekmesi altında yer alan "Macros" butonuna tıklayarak makroyu çalıştırın. Eğer "Developer" sekmesi görünmüyor ise, Excel seçeneklerinden bu sekmenin etkinleştirilmesi gerekebilir.
Faydalanılması temennisiyle
