Excel VBA: Buat Baris Baru di MsgBox (6 Contoh)

Hugh West

20-06-2023 Makro &; Excel VBA
  • Bagikan Ini
Hugh West

Kami sering menggunakan MsgBox di VBA untuk menampilkan notifikasi setelah menjalankan kode-kode. Terkadang satu baris tidak dapat menampilkan output dengan benar. Maka kita perlu menambahkan baris baru Jadi dari artikel ini, Anda akan belajar 6 Macro yang berguna untuk menambahkan baris baru di MsgBox menggunakan Excel VBA.

Unduh Buku Kerja Praktik

Anda bisa mengunduh templat Excel gratis dari sini dan berlatih sendiri.

Buat Baris Baru di MsgBox.xlsm

6 Contoh untuk Membuat Baris Baru di MsgBox Menggunakan Excel VBA

1. Gunakan vbNewLine untuk Menambahkan Baris Baru di MsgBox Menggunakan Excel VBA

Di sini, kita akan menggunakan vbNewLine di Makro VBA untuk menambahkan baris di MsgBox. Saya akan menunjukkan " Halo! " di baris pertama dan " Selamat datang di ExcelWIKI" di baris kedua.

Langkah-langkah:

  • Tekan Alt + F11 untuk membuka Jendela VBA .
  • Kemudian klik sebagai berikut untuk menyisipkan modul: Masukkan ➤ Modul .

  • Kemudian, ketikkan kode-kode berikut di dalamnya- 
 Sub NewLine_vbNewLine() MsgBox "Hello!" & vbNewLine & "Selamat datang di ExcelWIKI" End Sub

  • Kemudian kembali untuk Anda lembar dan klik sebagai berikut untuk membuka Makro kotak dialog: Pengembang ➤ Makro .

  • Pilih yang Nama makro sebagaimana ditentukan dalam kode .
  • Terakhir, cukup tekan Lari .

Sekarang lihatlah, vbNewLine menunjukkan output dalam dua baris .

Baca selengkapnya: VBA untuk Menghasilkan Beberapa Baris di Badan Email di Excel (2 Metode)

2. Gunakan vbCrLf untuk Membuat Baris Baru di MsgBox Menggunakan VBA di Excel

Sekarang kita akan menggunakan konstanta lain dari VBA - vbCrLf untuk membuat baris baru di MsgBox Ini juga akan menambahkan baris baru di antara dua baris yang berurutan.

Langkah-langkah:

  • Pertama, ikuti dua langkah pertama dari metode pertama untuk menyisipkan modul di dalam VBA
  • Kemudian menulis berikut ini kode di dalamnya- 
 Sub Sub NewLine_vbCrLf() MsgBox "Hello!" & vbCrLf & vbCrLf & "Selamat datang di ExcelWIKI" End Sub

  • Selanjutnya, ikuti langkah keempat dari metode pertama untuk membuka Kotak dialog makro .
  • Pilih Nama makro dan tekan Lari .

Konstanta vbCrLf telah menambahkan baris baru dengan garis celah juga.

Baca selengkapnya: Cara Menambahkan Garis di Sel Excel (5 Metode Mudah)

3. Masukkan vbLf untuk Menambahkan Baris Baru di MsgBox Menggunakan Excel VBA

Mari kita gunakan konstanta lain- vbLf untuk menambahkan baris baru di MsgBox di Excel VBA.

Langkah-langkah:

  • Ikuti dua langkah pertama dari metode pertama untuk menyisipkan modul di dalam VBA
  • Kemudian, menulis berikut ini kode di dalamnya- 
 Sub Sub NewLine_vbLf() MsgBox "Hello!" & vbLf & "Selamat datang di ExcelWIKI" End Sub

  • Kemudian ikuti langkah keempat dari metode pertama untuk membuka Kotak dialog makro .
  • Kemudian, pilih Nama makro seperti yang disebutkan dalam kode dan pers Lari .

Dan segera setelah Anda akan mendapatkan output yang diinginkan.

Baca selengkapnya: Cara Menambahkan Baris Baru dengan Rumus CONCATENATE di Excel (5 Cara)

4. Terapkan Chr untuk Membuat Baris Baru di MsgBox Menggunakan VBA di Excel

Di sini, kita akan menggunakan dua konstanta VBA- Chr(13) & Chr(10) untuk menambahkan garis.

Langkah-langkah:

  • Mulailah dengan mengikuti dua langkah pertama dari metode pertama untuk menyisipkan modul di dalam VBA
  • Kemudian menulis berikut ini kode di dalamnya- 
 Sub Sub NewLine_Chr() MsgBox "Hello!" & Chr(13) & Chr(10) & "Selamat datang di ExcelWIKI" End Sub

  • Setelah itu ikuti langkah keempat dari metode pertama untuk membuka Kotak dialog makro .
  • Kemudian pilih Nama makro dan tekan Lari .

Lihat bahwa kita mendapatkan output yang sama.

5. Tambahkan Baris Baru dalam Makro di Excel VBA

Dalam metode sebelumnya, kita tidak memecah baris dalam kode. Di sini, kita akan memecah dan menambahkan baris dalam kode.

Langkah-langkah:

  • Pertama, ikuti dua langkah pertama dari metode pertama untuk menyisipkan modul di dalam VBA
  • Selanjutnya, menulis berikut ini kode di dalamnya- 
 Sub Sub NewLine_within_Macro() MsgBox "Hello!" & vbCrLf & vbCrLf & _ "Selamat datang di ExcelWIKI" End Sub

  • Kemudian, ikuti langkah keempat dari metode pertama untuk membuka Kotak dialog makro .
  • Kemudian pilih saja Nama makro dan tekan Lari .

Sekarang lihat, bahwa makro memiliki menambahkan baris baru menjaga garis celah di antara garis-garis.

Baca selengkapnya: Cara Melakukan Istirahat Baris di Excel (4 Cara)

6. Sematkan VBA untuk Menambahkan Baris Baru di MsgBox Menggunakan Tombol

Dalam metode terakhir kita, kita akan melakukan tugas dengan cara yang sedikit berbeda. Kita akan menetapkan tombol untuk menambahkan baris di MsgBox .

6.1 Tombol untuk Baris Tunggal

Pertama, kita akan membuat tombol untuk menambahkan satu baris. Untuk itu, saya telah membuat dataset yang mewakili tiga sel untuk memberikan input Nama Belakang , Alamat dan Nomor telepon Ketika kita akan mengklik tombol tombol , itu akan memeriksa sel dan jika mendapatkan sel kosong kemudian akan tampilkan pesan untuk sel itu.

  • Klik sebagai berikut: Pengembang ➤ Sisipkan dan kemudian pilih yang kotak persegi panjang dari Bagian Kontrol Formulir .

  • Segera setelah itu, Anda akan mendapatkan tanda plus di kursor Anda, klik kiri mouse Anda dan seret pada lembar untuk mengatur ukuran tombol .

  • Kemudian klik kanan Anda tikus pada tombol dan pilih Edit Teks dari menu konteks untuk mengatur nama tombol .

  • Jenis yang Nama dan klik di mana saja pada lembar.

  • Lagi klik kanan Anda tikus pada tombol dan pilih Tetapkan Makro dari menu konteks untuk mengatur Makro .

  • Pada saat ini, berikan Nama makro dan tekan Baru .

  • Kemudian jenis berikut ini kode - 
 Private Sub SingleLine_Button() Dim WS As Worksheet Set WS = Sheets("Single Line") If WS.Range("C4").Value = "" Then MsgBox "Please Insert Last Name!" End If If WS.Range("C5").Value = "" Then MsgBox "Please Insert Address!" End If If WS.Range("C6").Value = "" Then MsgBox "Please Insert Phone Number!" End If End Sub

Perincian Kode

  • Pertama, saya menciptakan Sub prosedur SingleLine_Button .
  • Kemudian mendeklarasikan variabel WS sebagai Lembar Kerja .
  • Kemudian menggunakan tiga Pernyataan IF untuk memeriksa sel, jika sel diisi dengan nilai maka itu akan abaikan saja dan jika mendapatkan sel kosong kemudian akan menunjukkan pesan yang sesuai melalui MsgBox .
  • Kemudian, hanya kembali untuk Anda lembar dan klik yang tombol .

Sebagai Nama Belakang kosong, itulah sebabnya mengapa ia menampilkan pesan notifikasi.

  • Tekan OK dan kemudian akan memeriksa bidang kedua.

Yang kedua bidang kosong juga begitu menambahkan baris baru untuk memberitahukannya .

Di sini, saya mengisi bidang pertama dan mengklik tombolnya, dan melihat bahwa ia melewatkan bidang itu dan melompat ke bidang kedua untuk menampilkan pesan.

6.2 Tombol untuk Beberapa Baris

Dengan menetapkan tombol ini, kita akan dapat menambahkan beberapa baris sekaligus dalam kotak pesan.

  • Pertama, ikuti 6 langkah pertama dari bagian sebelumnya untuk menambahkan tombol dan menetapkan makro .

  • Kemudian jenis berikut ini kode dalam makro- 
 Sub Multiple_Line_Button() Dim WS As Worksheet Set WS = Sheets("Multiple Line") Dim Last_Name, Address, Phone, Error_msg As String Last_Name = Len(WS.Range("C4")) Address = Len(WS.Range("C5")) Phone = Len(WS.Range("C6")) If Last_Name = 0 Then Error_msg = "Please Insert Last Name!" End If Address = 0 Then Error_msg = Error_msg & vbNewLine & "Please Insert Address!" End If Phone = 0Then Error_msg = Error_msg & vbNewLine & "Silahkan Masukkan Nomor Telepon!" End If Error_msg "" Then MsgBox Error_msg, vbOKOnly, Title:="Important Caution!" Exit Sub End If End Sub

Perincian Kode

  • Di sini, saya menciptakan Sub prosedur Tombol_Baris_Banyak .
  • Kemudian mendeklarasikan beberapa variabel WS Sebagai Lembar Kerja dan Nama_Terakhir , Alamat , Telepon , Error_msg Sebagai
  • Kemudian, digunakan Len dan Rentang untuk mengatur bidang.
  • Akhirnya, digunakan Jika pernyataan untuk memeriksa apakah bidang kosong atau tidak Jika terisi maka akan melewatinya dan jika tidak maka akan menampilkan pesan melalui MsgBox .
  • Akhirnya, hanya kembali ke lembaran dan klik yang tombol .

Dan lihatlah itu menunjukkan tiga baris untuk tiga bidang karena mereka semua adalah kosong .

Saya mengisi bidang pertama dan sekarang lihat, itu hanya menampilkan pesan untuk 2 bidang berikutnya .

Baca selengkapnya: Cara Menempatkan Banyak Baris di Sel Excel (2 Cara Mudah)

Kesimpulan

Saya harap prosedur yang dijelaskan di atas akan cukup baik untuk membuat baris baru di MsgBox menggunakan Excel VBA. Jangan ragu untuk mengajukan pertanyaan di bagian komentar dan tolong beri saya umpan balik.

Postingan sebelumnya Cara Menghilangkan Ruang Putih di Excel (6 Cara Mudah)
Postingan berikutnya Cara Menghitung Jumlah Karakter dalam Sel di Excel (6 Cara Termudah)

Hugh West adalah pelatih dan analis Excel yang sangat berpengalaman dengan pengalaman lebih dari 10 tahun di industri ini. Beliau meraih gelar Sarjana di bidang Akuntansi dan Keuangan dan gelar Master di bidang Administrasi Bisnis. Hugh memiliki hasrat untuk mengajar dan telah mengembangkan pendekatan pengajaran unik yang mudah diikuti dan dipahami. Pengetahuan ahlinya tentang Excel telah membantu ribuan siswa dan profesional di seluruh dunia meningkatkan keterampilan dan unggul dalam karier mereka. Melalui blognya, Hugh membagikan pengetahuannya kepada dunia, menawarkan tutorial Excel gratis dan pelatihan online untuk membantu individu dan bisnis mencapai potensi penuh mereka.