[VBA] 常用程式碼系列29-Vba發出嗶嗶聲－問問蓮蓬頭

【說明】

如果在執行程式碼的過中，讓系統可出現警示音，提醒使用者某事件被觸發了，必須小心或進行額外的判斷，程式碼不難但多一道系統提醒讓使用者多一分注意。

【程序碼】

1.先點選你想要執行的工作表(紅框處)，然後物件名稱選取Worksheet

[VBA] 常用程式碼系列29-Vba發出嗶嗶聲

2.事件名稱選取Change

[VBA] 常用程式碼系列29-Vba發出嗶嗶聲

3.輸入以下程式碼

Private Sub Worksheet_Change(ByVal Target As Range)

If Range("B1").Value > 10 Then

Beep

MsgBox "系統出現警示音", , "警示視窗"

End If

End Sub

【程序碼解說】

Private Sub Worksheet_Change(ByVal Target As Range) 當工作表變更時,執行

If Range("B1").Value > 10 Then 如果異動的是儲存格B1，且輸入值大於10時

Beep 系統發出警示音

MsgBox "系統出現警示音", , "警示視窗" 系統跳出警示警示視窗

End If

End Sub

謝謝您閱讀了我的文章，若您喜歡我的文章，希望您幫我按個「讚」，也幫忙分享給需要的朋友或其他平台，謝謝。

Excel VBA 巨集警示音發出聲音 BEEP

黑天使

問問蓮蓬頭

黑天使發表在痞客邦留言(0) 人氣()

E-mail轉寄

問問蓮蓬頭