Sayfada Alan Seçme ve Listeleme
16 Haziran 2021
1035
Sayfada Alan Seçme ve Listeleme isimli kod, sayfa üzerinden alan seçmeyi ve seçilen alanı MsgBox nesnesinde listelemeyi öğretmektedir.
Sub Alan_Sec_Listele()
Dim Alan As Range
On Error Resume Next
Set Alan = Application.InputBox(Prompt:="Bir alan seçiniz:", Type:=8)
If Alan Is Nothing Then Exit Sub
MsgBox Alan.Address & " Alanını seçtiniz..."
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.
Kod Açıklaması
Excel makrolarınızda bazen sayfalardan alan seçmek ya da seçilmiş bir alanın adresinin listelenmesine ihtiyacınız olabilir. Bu gibi durumlar için üstteki kodlarımızı kendinize uyarlayacak şekilde kullanabilirsiniz.
Faydalanılması temennisiyle.
Etiketler :
Hazır Dosyayı İndir
Dosyayı indirmek için giriş yapmanız ve VIP Üyelik Paketine sahip olmanız gerekir.
| YARARLI KISAYOLLAR | |
|---|---|
| Ekranı Küçültme | Ctrl F5 |
| Yazdırma Penceresini Açma | Ctrl F2 |
| Hücreye Açıklama Ekleme | Shift F2 |
| Binlik Ondalık Ayırıcı Ekleme | Ctrl Shift 1 |
| Hücreyi Para Birimi Olarak Biçimlendirme | Ctrl Shift $ |