Excel VBA Giriş Kutusu
VBA InputBox , kullanıcıdan bir değer almak için kullanılan dahili bir işlevdir, bu işlevin biri giriş kutusu için başlık, diğeri giriş kutusu için soru olmak üzere iki ana argüman vardır, giriş kutusu işlevi yalnızca veri türlerini depolayabilir. değişken tutabilir.
Genellikle excel'de, zaten excel sayfasında bulunan verileri kullanırız. Bazen kullanıcılardan gelen bir tür giriş verilerine de ihtiyacımız olur. Özellikle VBA'da çoğu zaman kullanıcıdan girdi gereklidir.
InputBox'ı kullanarak verileri kullanıcıdan alabilir ve amacımız için kullanabiliriz. Bir InputBox, kullanıcıdan InputBox'ı görüntüleyerek değeri girmesini isteyecektir.
Sözdizimi
- Bilgi istemi: Bu, bir giriş kutusu aracılığıyla kullanıcıya gönderilen mesajdan başka bir şey değildir.
- Başlık: Giriş kutusunun başlığı nedir?
- Varsayılan: Giriş kutusunun varsayılan değeri nedir? Bu değer, giriş kutusunun yazma alanında görünür.
Bu üç parametre Excel'de yeterince iyidir. Diğer 4 isteğe bağlı parametreyi göz ardı edin. Bu sözdizimini anlamak için aşağıdaki ekran görüntüsüne bakın.
VBA'da InputBox Nasıl Oluşturulur?
Tamam, doğrudan pratikliğe geçelim. İlk giriş kutunuzu oluşturmak için aşağıdaki adımları izleyin.
Adım 1: VBE'ye (Visual Basic Editor) gidin ve yeni bir modül ekleyin.
Adım 2: Eklenen modüle çift tıklayın ve bir makro adı oluşturun.
Adım 3: "InputBox" kelimesini yazmaya başlayın, ilgili seçenekleri göreceksiniz.
Adım 4: Giriş kutusunu seçin ve boşluk bırakın; giriş kutusunun sözdizimini göreceksiniz.
Adım 5: "Lütfen Adınızı Girin" komut istemini verin.
6. Adım: Giriş kutusunun Başlığını "Kişisel Bilgiler" olarak yazın.
7. Adım: "Buraya yazın" olarak varsayılan değeri yazın.
Adım 8: Bitirdik. Bu kodu çalıştırın ve ilk giriş kutunuzu görün.
InputBox Değerini Hücrelere Kaydetme
Şimdi değerleri hücrelerde saklama sürecinden geçeceğiz. Aşağıdaki adımları izleyin.
Adım 1: Değişkeni Değişken olarak bildirmek.
Kod:
Sub InputBox_Example () Dim i As Variant End Sub
Adım 2: Bu değişken için, değeri giriş kutusu aracılığıyla atayın.
Kod:
Sub InputBox_Example () Dim i Varyant olarak i = InputBox ("Lütfen Adınızı Girin", "Kişisel Bilgiler", "Buraya Yazın") Son Alt
Not: Giriş kutusu eşittir işaretinin sağına geldiğinde, normal formüllerimiz gibi parantez içinde argümanları veya sözdizimini girmemiz gerekir.
Adım 3: Şimdi, giriş kutusuna yazılan değer ne olursa olsun, onu A1 hücresinde saklamamız gerekir. Bunun için kodu Aralık ("A1") olarak yazın. Değer = i
Kod:
Alt InputBox_Example () Dim i Değişken Olarak i = InputBox ("Lütfen Adınızı Girin", "Kişisel Bilgiler", "Buraya Yazın") Aralık ("A1"). Değer = i Son Alt
Tamam, bitirdik. Şimdi bu kodu F5 tuşuna basarak çalıştıralım veya aşağıdaki ekran görüntüsünde gösterildiği gibi kodu manuel olarak da çalıştırabilirsiniz.
Bu kodu çalıştırır çalıştırmaz, giriş kutusunu göreceğiz.
Adı yazın ve Tamam'a tıklayın.
Adı yazıp Tamam'a tıkladığınızda, A1 hücresinde giriş kutusu değerini göreceksiniz.
Not: Değişken doğru tanımlanmışsa, giriş kutusundaki herhangi bir değeri saklayabiliriz. Yukarıdaki örnekte, değişkeni her tür veriyi tutabilen bir Değişken olarak tanımladım .
Örneğin, şimdi değişken türünü Tarih olarak değiştirdim.
Şimdi kodu çalıştırın ve tarih dışında bir tür yazın.
Tamam'a tıklayın ve cevabın ne olduğunu görün.
We got the error value as Type mismatch. Since we have declared the variable data type as DATE, we cannot store anything other than DATE with an inputbox.
Now enter the date and see what happens.
As soon as you type the date and then click on OK and see what the response is.
Since we have entered the correct value, we got the result in the cell.
Validation of Input from User
You know what we can actually allow users to enter only specific value i.e., allow the user to enter only text, only number, only logical values, etc.
To perform this task, we need to use the method Application.InputBox.
Let’s look at the syntax of the Application.InputBox.
- Prompt: This is nothing but the message to the user through an input box.
- Title: What is the title of the input box?
- Default: What is the default value of the input box? This value appears in the typing area of the input box.
- Left: What should be the x position of the input box in the current window?
- Top: What should be the y position of the inputbox in the current window?
To start this, inputbox declare variable and assign the value to a variable.
Now to assign value to start the word Application.
After the word Application, put a dot (.) and type Inputbox.
Select the input box and open the bracket.
As usual, enter Prompt, Title, and Default Value.
Now ignore left, top, help file, help context ID by typing 5 commas (,).
Here Type means what should be the input string. Below are the validations available.
Dolayısıyla, türünüzü seçin. Parametre olarak 1'i, yani sadece sayıları seçtim.
Şimdi kodu ve metin değeri türünü çalıştırın.
Tamam'a tıklayın ve ne olacağını görün.
Numaranın geçerli olmadığını söylüyor. Yani bu giriş kutusuna yalnızca sayı girebiliriz.
Hatırlanacak şeyler
- Giriş kutusu tarafından verilen değeri saklamak için bir değişkene ihtiyacımız var.
- InputBox'ı Uygulama yöntemi olmadan kullanıyorsanız, değişken veri türü konusunda mükemmel olmalısınız.
- Her tür veri türünü tutabilen ve depolayabilen Variant veri türünü kullanın.
