Excel MsgBox kutu örnekleri: Sub mesaj_kutuları() 'MsgBox "Bu işlemi yapamazsınız.", vbCritical 'MsgBox "Bu işlemi yapamazsınız.", vbInformation 'MsgBox "Bu işlemi yapamazsınız.", vbAbortRetryIgnore 'MsgBox "Bu işlemi yapamazsınız.", vbYesNo 'cevap = MsgBox("Bu işlemi gerçekten yapmak istiyor musunuz?", vbYesNo + vbCritical) 'If cevap = vbYes Then 'MsgBox "İşlem yapıldı" 'Else 'MsgBox "işlem yapılmadı." 'End If 'MsgBox "mesajım", vbCritical, "başlık" 'girdi = InputBox("Bir sayı girin", "Kare Al") 'MsgBox girdi * girdi End Sub