Özel Sayfaları Yazdırma
Bu kod ile Özel Sayfaları Yazdırma işlemini çok hızlı bir şekilde gerçekleştirebilir, işlerinizde zaman tasarrufu sağlayabilirsiniz.
Özel Sayfaları Yazdırma başlıklı kod bankası içeriğine Yorum olarak bir VBA kodu ekleyin, 100 hediye Puan kazanın.
Gerekli Adımlar
Kodu çalıştırmanız için aşağıdaki adımları yerine getirmeniz gerekir.
- 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.
- Üstteki kodu yapıştırın.
Daha önce yorum yapılmamış!
| YARARLI KISAYOLLAR | |
|---|---|
| Kes İşlemi Kısayolu | Ctrl X |
| Tablo Olarak Biçimlendirme | Ctrl L |
| İşlem Yapılmış En Alt Hücreye Gitme | Ctrl End |
| Satırın Başına Gitme | Home |
| İşlem Yapılmış En Üst Hücreye Gitme | Ctrl Home |
Shift tuşunu kullanarak, satır ve sütunlardaki verileri oldukça hızlı bir şekilde yer değiştirebilirsiniz. Örneğin, bir satırda bulunan verileri aşağı ya da yukarı taşımak isterseniz, ilgili satırların numaralarından tamamını seçme yaptıktan sonra, shift tuşunu basılı tutmak suretiyle fare işaretini taşımak istediğiniz aralıktaki herhangi bir hücrenin hemen en alt/üst kısmına getirin.
Fare oku bu şekli aldıktan sonra, istediğiniz yere ilgili satırları kolayca taşıyabilirsiniz.
Sütunlar içinde benzer işlemi sütun seçip, ilgili hücrenin sağ/sol kısmına getirip Shift tuşuna basılı tutarak mause ile sürüklemek suretiyle yapabilirsiniz.
Fare oku bu şekli aldıktan sonra, istediğiniz yere ilgili satırları kolayca taşıyabilirsiniz.
Sütunlar içinde benzer işlemi sütun seçip, ilgili hücrenin sağ/sol kısmına getirip Shift tuşuna basılı tutarak mause ile sürüklemek suretiyle yapabilirsiniz.