The VBA Beep function lets you play a system beep sound whenever you like. This example macro shows you how to play a beep whenever an error is encountered in your code. VBA Beep usually comes through your speakers so make sure your volume is up.
VBA Beep and Display Message on Error
Sub SystemBeep() Dim i As Integer On Error GoTo errorhandle: i = "test" 'you can't assign a string to an integer! Exit Sub errorhandle: Application.EnableSound = True Beep MsgBox "Error #" & Err.Number & ": " & Err.Description End Sub
Can't get enough VBA?
Subscribe to our free wellsrPRO VBA training program for more VBA tricks. I'll share my top VBA secrets and show you how to import my entire macro library directly into your spreadsheet with just one click.
This macro beeps and displays an error because I tried to assign a string to an integer data type. The
Application.EnableSound property ensures sound is enabled for Microsoft Office. Rarely is this necessary so you can often omit that line. Try it without the line if you get an error. It’s common to omit the line when playing system beeps outside of Excel, like in Microsoft Word.
This is just the tip of the iceberg. Soon, I’ll show demonstrate other VBA audio tricks, like how to get your computer to speak to you and how to control your volume with VBA. Stick around!
Let’s have a discussion in the comments section!
Please subscribe to my email list, share this article on social media and follow me on Twitter and check out our VBA Q&A community for more great VBA content.