Vba: cara membuat kotak pesan dengan jawaban ya/tidak

Anda dapat menggunakan sintaks berikut di VBA untuk membuat kotak pesan bagi pengguna untuk memilih Ya atau Tidak:

 Sub MsgBoxYesNo()

    'ask user if they want to multiply two cells
    UserResponse = MsgBox(" Do you want to multiply cells A1 and B1? ", vbYesNo)

    'perform action based on user response
    If UserResponse = vbYes Then
      Range(" C1 ") = Range(" A1 ") * Range(" B1 ")
    Else
      MsgBox “ No Multiplication was Performed ”
   End If

End Sub

Makro khusus ini membuat kotak pesan yang menanyakan pengguna apakah mereka ingin mengalikan sel A1 dan B1.

Jika pengguna mengklik “Ya”, kedua sel dikalikan dan hasilnya ditampilkan di sel C1.

Jika pengguna mengklik “Tidak”, kotak pesan baru akan muncul memberitahukan bahwa tidak ada perkalian yang dilakukan.

Perhatikan bahwa pernyataan vbYesNo adalah yang menyisipkan tombol “Ya” dan “Tidak” untuk diklik pengguna.

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh: Buat kotak pesan dengan jawaban Ya/Tidak

Misalkan kita memiliki dua nilai berikut di sel A1 dan B1 pada lembar Excel kita:

Katakanlah kita ingin membuat makro yang menampilkan kotak pesan kepada pengguna dan menanyakan apakah mereka ingin mengalikan nilai di sel A1 dan B1 atau tidak.

Kita dapat membuat makro berikut untuk melakukan ini:

 Sub MsgBoxYesNo()

    'ask user if they want to multiply two cells
    UserResponse = MsgBox(" Do you want to multiply cells A1 and B1? ", vbYesNo)

    'perform action based on user response
    If UserResponse = vbYes Then
      Range(" C1 ") = Range(" A1 ") * Range(" B1 ")
    Else
      MsgBox “ No Multiplication was Performed ”
   End If

End Sub

Saat kita menjalankan makro ini, kotak pesan berikut muncul:

Jika kita klik Yes , maka makro akan mengalikan nilai di sel A1 dan B2 dan menampilkan hasilnya di sel C1:

Namun jika kita klik No , maka akan muncul kotak pesan baru:

Kotak pesan memberitahu kita bahwa tidak ada perkalian yang dilakukan sejak kita mengklik Tidak di kotak pesan sebelumnya.

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

VBA: Cara menambahkan baris baru ke kotak pesan
VBA: Bagaimana cara menambahkan sheet baru
VBA: Cara membekukan panel