Msgbox Birden Fazla Örnekleri

Bu dosya, VBA'da MsgBox ve InputBox kullanımını öğrenmek isteyenler için hazırlanmış örnek koleksiyonudur. Tek bir UserForm üzerindeki düğmelerin her biri farklı bir mesaj kutusu örneğini çalıştırır. Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• exceldestek.com | exceldepo.com sayfası: A1:D12 aralığındaki tek çalışma sayfasıdır. Sayfada formül bulunmaz; örnek formunu açan bir düğme yer alır.
• UserForm2: MsgBox ve InputBox örneklerinin düğmeler halinde toplandığı formdur. Formda ayrıca iki metin kutusu (TextBox1 ve TextBox2) bulunur.
• Module1: form adlı makro ile UserForm2 formunu açar.

Makrolar​

Sayfadaki düğme ve form makrosu UserForm2 formunu gösterir. Formdaki düğmelerin yaptığı işlemler şunlardır:

• Saat, tarih, tarih ve saat: VBA.Time, VBA.Date ve VBA.Now değerlerini mesaj kutusunda gösterir.
• "Hoş Geldiniz" düğmesi: Basit bir bilgi mesajı verir.
• İsim düğmeleri: InputBox ile isim alınır ve TextBox1 ya da TextBox2 içine yazılır. İkincisinde ayrıca "İsminiz Doğrumu?" sorusu Evet/Hayır düğmeleriyle sorulur.
• Evet/Hayır sorgusu: "Begendin mi?" sorusuna verilen yanıta göre farklı bir mesaj gösterilir.
• Doğum günü: Girilen doğum tarihi geçerli bir tarih olana kadar sorulur; Weekday ile doğulan gün adı bulunur.
• Ücret hesabı: Girilen ücret 1,18 ile çarpılarak sonuç gösterilir.
• Çalışma kitabı adı ve yazıcı: ActiveWorkbook.Name ile dosya adı, ActivePrinter ile etkin yazıcı gösterilir.
• Sürücü sayısı: Scripting.FileSystemObject ile bilgisayardaki sürücü sayısı gösterilir.
• Çıkış düğmesi: End komutuyla çalışan kodu durdurur.

Kodda dosya silme ya da dışarıya bağlantı kuran bir işlem yoktur.

Nasıl kullanılır​

1. Dosyayı açın ve güvenlik uyarısında makroları etkinleştirin.
2. Sayfadaki düğmeye basarak formu açın.
3. Denemek istediğiniz örneğin düğmesine tıklayın; istenen yerlerde InputBox'a değer girin.
4. Kodları incelemek için Alt+F11 ile VBA düzenleyicisini açın ve UserForm2 kod bölümüne bakın.