InputBox VBA

InputBox Excel VBA

VBA InputBox adalah fungsi inbuilt yang digunakan untuk mendapatkan nilai dari pengguna, fungsi ini mempunyai dua argumen utama di mana satu adalah menuju kotak input dan yang lain adalah pertanyaan untuk kotak input, fungsi kotak input hanya dapat menyimpan input jenis data yang boleh dipegang oleh pemboleh ubah.

Selalunya di excel, kami menggunakan data yang sudah ada di lembaran excel. Kadang-kadang kita memerlukan sejenis data input dari pengguna juga. Terutama dalam input VBA dari pengguna diperlukan seringkali.

Dengan menggunakan InputBox kita dapat memperoleh data dari pengguna dan menggunakannya untuk tujuan kita. InputBox akan meminta pengguna memasukkan nilainya dengan memaparkan InputBox.

Sintaks

  • Prompt: Ini hanyalah mesej kepada pengguna melalui kotak input.
  • Tajuk: Apakah tajuk kotak input?
  • Lalai: Apakah nilai lalai dari kotak input? Nilai ini muncul di kawasan menaip kotak input.

Ketiga-tiga parameter ini cukup baik di Excel, abaikan 4 parameter pilihan yang lain. Untuk memahami sintaks ini, lihat tangkapan skrin di bawah.

Bagaimana Membuat InputBox di VBA?

Baiklah, teruskan ke praktikal. Ikuti langkah di bawah untuk membuat kotak input pertama anda.

Anda boleh memuat turun Templat VBA InputBox Excel ini di sini - Templat VBA InputBox Excel

Langkah 1: Pergi ke VBE (Visual Basic Editor), dan masukkan modul baru.

Langkah 2: Klik dua kali pada modul yang dimasukkan dan buat nama makro.

Langkah 3: Mula menaip perkataan "InputBox" anda akan melihat pilihan yang berkaitan.

Langkah 4: Pilih INPUTBOX dan beri ruang dan anda akan melihat sintaks kotak input.

Langkah 5: Beri arahan sebagai "Sila Masukkan Nama Anda".

Langkah 6: Taipkan Tajuk kotak input sebagai "Maklumat Peribadi".

Langkah 7: Taipkan nilai lalai sebagai "Taip di sini"

Langkah 8: Kami sudah selesai. Jalankan kod ini dan lihat kotak input pertama anda.

Simpan Nilai InputBox ke Sel

Sekarang kita akan melalui proses menyimpan nilai dalam sel. Ikuti langkah di bawah.

Langkah 1: Menyatakan pemboleh ubah sebagai Varian.

Kod:

 Sub InputBox_Contoh () Dim i Sebagai Variasi Akhir Sub 

Langkah 2: Untuk pemboleh ubah ini berikan nilai melalui kotak input.

Kod:

 Sub InputBox_Contoh () Dim i Sebagai Varian i = InputBox ("Sila Masukkan Nama Anda", "Maklumat Peribadi", "Taip Di Sini") Sub Akhir 

Catatan: Setelah kotak input berada di sebelah kanan tanda sama, kita perlu memasukkan argumen atau sintaks dalam tanda kurung seperti formula biasa kita.

Langkah 3: Sekarang apa sahaja nilai yang ditaip di kotak input, kita perlu menyimpannya di sel A1. Oleh itu, tulis kodnya sebagai Range ("A1"). Nilai = i

Kod:

 Sub InputBox_Contoh () Dim i Sebagai Varian i = InputBox ("Sila Masukkan Nama Anda", "Maklumat Peribadi", "Taip Di Sini") Julat ("A1"). Nilai = i Akhir Sub 

Ok, kita sudah selesai. Mari jalankan kod ini sekarang dengan menekan kekunci F5 atau anda juga boleh menjalankan kod secara manual seperti yang ditunjukkan dalam tangkapan skrin di bawah.

Sebaik sahaja anda menjalankan kod ini, kami akan melihat kotak input.

Taipkan nama dan klik Ok.

Sebaik sahaja anda menaip nama dan klik OK, anda akan melihat nilai kotak input di sel A1.

Catatan: Kami dapat menyimpan sebarang nilai dari kotak input jika pemboleh ubah ditentukan dengan betul. Dalam contoh di atas, saya telah menentukan pemboleh ubah sebagai Varian yang dapat menyimpan semua jenis data.

Sebagai contoh, sekarang saya telah menukar jenis pemboleh ubah menjadi Tarikh.

Sekarang jalankan kod dan taip selain tarikh.

Klik ok dan lihat apa jawapannya.

Kami mendapat nilai ralat sebagai Ketidakcocokan Jenis . Oleh kerana kami telah menyatakan jenis data pemboleh ubah sebagai DATE, kami tidak dapat menyimpan apa-apa selain DATE dengan kotak input.

Sekarang masukkan tarikh dan lihat apa yang berlaku.

Sebaik sahaja anda menaip tarikh dan kemudian klik OK dan lihat apa jawapannya.

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 and etc.

In order 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 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.

So, accordingly, select your type. I have selected 1 as the parameter i.e. only numbers.

Now run the code and type of text value.

Click on OK and see what happens.

It says the number is not valid. So we can enter only numbers in this input box.

Things to Remember

  • We need a variable to store the value given by the input box.
  • If you are using InputBox without the Application method then you should be perfect about the variable data type.
  • Use Variant data type which can hold any kind of data type and stores.