Satır Yüksekliklerini Otomatik Ayarlama
31 Ocak 2021
963
Satır Yüksekliklerini Otomatik Ayarlama isimli kodu kullanarak, istediğiniz sütunların genişliklerini kolayca otomatik olarak ayarlayabilirsiniz.
Sub AutoFitRows()
Cells.Select
Cells.EntireRow.AutoFit
End SubGerekli 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.
| YARARLI KISAYOLLAR | |
|---|---|
| Son İşlemi Tekrar Etme | F4 |
| Formül Çubuğı Genişletme/Daraltma | Ctrl Shift U |
| Açılır Listeden Seçim Yapma | Alt ↓ |
| Ad Yöneticisi Penceresini Açma | Ctrl F3 |
| Yazdırma Alanı Belirlemek | Alt P M B |