InputBox ile Veri İstemek

Kullanıcıdan Girdi Almak

Dinamik filtreleme makrolarında kullanıcının arayacağı kelimeyi veya tarihi kod içine girmesi için InputBox açılır.

VBA Kodu:

Sub AySor()
    Dim arananAy As String
    arananAy = InputBox("Raporlanacak Ayı Giriniz:", "Ay Filtresi", "Ocak")
    If arananAy <> "" Then Range("A1").Value = arananAy
End Sub

Ne Göreceksiniz? İçinde "Ocak" yazan bir girdi penceresi açılacak. Kullanıcı "Mart" yazıp Tamam dediğinde bu değer A1 hücresine aktarılacaktır.