• DOSYALAR modülümüzdeki VIP Dosyalar'ı indirmek için,
    FORUM'da konu açabilmek için,
    FORUM'da açılan konulardaki dosyaları indirmek için,
    FORUM'da herhangi bir konuya dosya yüklemek için üyelik hesabınızı VIP Üyelik seviyesine yükseltmeniz gerekir. "Normal Kullanıcı" seviyesindeki üyeler, Ücretsiz Dosyalar kategorisinden dosya indirmek haricinde, farklı bir alandan dosya indiremez, Forum alanında soru soramazlar.
Hazırladığınız bir makro'da, kullanıcıların bir değer girerek işlem yapmasını sağlamak istiyorsanız. InputBox fonksiyonunu kullanabilirsiniz.
Şimdi çalışma sayfanıza bir komut düğmesi yerleştirin ve aşağıdaki kodları yapıştırın:

1. Önce, "Değer" isminde türü Variant olan bir değişken tanımlayalım.

Dim Değer As Variant

Not: Kullanıcının ne yazacağından emin değilsek (metin veya sayı) bunun için Variant türünde değişkenler tanımlamalıyız.

2. InputBox kutusunu göstermek için aşağıdaki kod satırını ekleyin.

Değer = InputBox("Herhangi bir değer yazın")

ip1.png


3. Değer olarak tanımladığımız değişkeni, A1 hücresine yazdıralım.

Range("A1").Value = Değer

Kullanıcı kutucuğa 5 yazarsa, ortaya çıkacak sonuç şu şekilde olacaktır:

ip2.png


4. InputBox fonksiyonunu 2 ayrı argümana daha sahiptir. Bunlardan ilki başlık satırı, ikincisi ise varsayılan olarak kutucuğa yazdırmak istediğiniz değerdir.

Değer = InputBox("Herhangi bir değer yazın", "Değer Yazılacak", 1)


ip3.png


OK butonuna tıkladığınızda ortaya çıkacak sonuç:

ip4.png
 
Geri
Üst