Ken biết cách tạo các định dạng có điều kiện trong Excel. Tuy nhiên, điều anh ấy thực sự muốn làm là yêu cầu Excel tạo ra âm thanh có thể nghe được (tiếng bíp hoặc bất cứ điều gì) nếu các điều kiện được đáp ứng.

Không có cách nào để làm điều này mà không sử dụng macro. Nếu bạn chỉ muốn phát ra âm thanh bíp, bạn có thể sử dụng một cái gì đó như sau:

Function BeepMe() As String     Beep     BeepMe = ""

End Function

Tất cả những gì chức năng do người dùng định nghĩa này là phát âm thanh (sẽ thay đổi tùy thuộc vào hệ thống bạn đang sử dụng) và sau đó trả về một chuỗi trống.

Bạn có thể sử dụng hàm trong trang tính của mình theo cách sau:

=IF(A12>300,BeepMe(),"")

Nếu bạn muốn phát một số âm thanh khác với tiếng bíp hệ thống mặc định, bạn sẽ cần sử dụng chức năng Windows API PlaySound. Đoạn mã sau tạo một hàm do người dùng xác định sẽ đóng vai trò “tada” mặc định

âm thanh rất phổ biến trong Windows.

Private Declare Function PlaySound Lib "winmm.dll" _   Alias "PlaySoundA" (ByVal lpszName As String, _   ByVal hModule As Long, ByVal dwFlags As Long) As Long

Const SND_SYNC = &H0     Const SND_ASYNC = &H1     Const SND_FILENAME = &H20000

Function SoundMe() As String     Call PlaySound("c:\windows\media\tada.wav", _       0, SND_ASYNC Or SND_FILENAME)

SoundMe = ""

End Function

Chức năng này có thể được gọi giống như ví dụ trước:

=IF(A12>300,SoundMe(),"")

Nếu bạn muốn phát một tệp WAV khác, chỉ cần thay đổi đặc tả tệp trong chức năng SoundMe.

_Lưu ý: _

Nếu bạn muốn biết cách sử dụng các macro được mô tả trên trang này (hoặc trên bất kỳ trang nào khác trên trang ExcelTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.

ExcelTips là nguồn của bạn để đào tạo Microsoft Excel hiệu quả về chi phí.

Mẹo này (7658) áp dụng cho Microsoft Excel 97, 2000, 2002 và 2003. Bạn có thể tìm thấy phiên bản của mẹo này cho giao diện ribbon của Excel (Excel 2007 trở lên) tại đây: