Tạo âm báo khi thay đổi hoặc nhập sai giá trị trong Excel

Lưu ý: Bạn hãy đọc thật kỹ bài viết trước khi thực hiện nhé ! Nếu như trong quá trình sử dụng bạn gặp bất cứ lỗi gì, ví dụ như bị lỗi link download, blog load chậm, hay là không truy cập vào được một trang nào đó trên blog... thì bạn vui lòng thông báo với mình qua trang Liên Hệ nhé. Thanks !

Cách tạo âm thanh thông báo trên Excel khi người dùng thực hiện thay đổi hoặc nhập giá trị lớn hơn, nhỏ hơn hoặc là bằng…


Trong quá trình làm việc với file Excel, mình tin chắc sẽ chẳng có ai dám tự tin khẳng định rằng mình chưa từng nhập sai một số liệu nào đó trên bảng tính đúng không ạ. Vâng, thực tế thì việc nhập sai dữ liệu trên các bảng tính là chuyện không có gì xa lạ.

Và để giúp các bạn giảm thiểu các sai sót không đáng có khi làm việc trên Excel thì trong bài viết ngày hôm nay, mình sẽ chia sẻ với các bạn một mẹo nhỏ trong việc tạo cảnh báo khi chúng ta nhập, hay thay đổi các giá trị trên Excel bằng âm thanh nhé.

Hiện tại, theo mặc định thì Excel vẫn chưa hỗ trợ tính năng này. Do vậy để làm được điều đó, chúng ta phải thực hiện hoàn toàn bằng code VBA.

Đọc thêm:

#1. Tạo âm báo khi nhập sai giá trị so với yêu cầu trong Excel

+ Bước 1: Đầu tiên bạn mở file Excel của mình lên.

tao-am-bao-khi-nhap-sai-gia-tri-trong-excel (1)

+ Bước 2: Tại đây, bạn mở tab Developer lên => và chọn Visual Basic. Hoặc bạn có thể nhấn tổ hợp phím Alt + F11 để mở trình VBA.

tao-am-bao-khi-nhap-sai-gia-tri-trong-excel (2)

+ Bước 3: Tiếp theo hộp thoại Microsoft Visual Basic for Applications hiện lên. Tại đây bạn mở thanh menu Insert => và chọn Module.

tao-am-bao-khi-nhap-sai-gia-tri-trong-excel (3)

+ Bước 4: Rồi copy đoạn mã Code sau….

Function BeepMe() As String
Beep
BeepMe = “”
End Function

… và Paste vào hộp thoại Module, trước khi click thoát.

tao-am-bao-khi-nhap-sai-gia-tri-trong-excel (4)

+ Bước 5: Sau đó nhập công thức bên dưới vào => và nhấn Enter để thực thi.

=IF (hàm điều kiện)><= giá trị xác định, rồi nhập BeepMe()“”

Ví dụ mình sử dụng hàm:=IF(A2>500,BeepMe()“”) để cảnh báo bằng âm thanh khi nhập các giá trị nếu lớn hơn 500.

Tương tự như vậy. Để tìm các giá trị bé hơn hoặc bằng bạn chỉ cần thay dấu (<), (=) là được.

Hoặc xác định giá trị khác thì thay số 500 bằng giá trị bất kỳ, của bạn trên bạn tính để hàm IF dựa theo đó mà thông báo.

tao-am-bao-khi-nhap-sai-gia-tri-trong-excel (5)

Khi tạo công thức xong, bạn sẽ được một ô trắng chứa hàm điều kiện, lúc này bạn chỉ cần Fill công thức xuống để áp dụng cho toàn bộ danh sách là được.

tao-am-bao-khi-nhap-sai-gia-tri-trong-excel (6)

Rồi nhập dữ liệu bình thường tại ô tham chiếu. Lúc này bạn sẽ thấy âm thanh thông báo xuất hiện khi bạn nhập nó sai so với điều kiện mà bạn đã đặt ra.

tao-am-bao-khi-nhap-sai-gia-tri-trong-excel (7)

#2. Tạo âm báo tuỳ chỉnh khi nhập giá trị sai yêu cầu

+ Bước 1: Với lựa chọn tuỳ chỉnh Âm báo. Đầu tiên bạn cần chuẩn bị một file Âm báo định dạng WAV. Và ghi copy đường dẫn của thư mục chứa file Âm báo.

tao-am-bao-khi-nhap-sai-gia-tri-trong-excel (9)

+ Bước 2: Sau đó bạn nhấn Alt + F11 để mở hộp thoại Microsoft Visual Basic for Applications tại Excel => và chọn Insert => chọn Module.

tao-am-bao-khi-nhap-sai-gia-tri-trong-excel (10)

+ Bước 3: Và bạn hãy copy đoạn mã Code sau:

#If Win64 Then
Private Declare PtrSafe Function PlaySound Lib “winmm.dll” _
Alias “PlaySoundA” (ByVal lpszName As String, _
ByVal hModule As LongPtr, ByVal dwFlags As Long) As Boolean
#Else
Private Declare Function PlaySound Lib “winmm.dll” _
Alias “PlaySoundA” (ByVal lpszName As String, _
ByVal hModule As Long, ByVal dwFlags As Long) As Boolean
#End If
Const SND_SYNC = &H0
Const SND_ASYNC = &H1
Const SND_FILENAME = &H20000
Function SoundMe() As String
‘Updateby Extendoffice 20161223
Call PlaySound(“Đường dẫn đến file.wav“, _
0, SND_ASYNC Or SND_FILENAME)
SoundMe = “”
End Function

…. và Paste vào hộp thoại Module => sau đó bạn thay đổi đường dẫn tới file Âm báo của bạn => sau đó đóng hộp thoại Microsoft Visual Basic for Applications.

tao-am-bao-khi-nhap-sai-gia-tri-trong-excel (8)

+ Bước 4: Và nhập công thức hàm  bên dưới vào => và nhấn Enter để thực thi.

=IF(giá trị tham chiếu, giá trị so sánh(<>=), giá cảnh báo, SoundMe(),“”)

Ví dụ mình sử dụng công thức: =IF(A2>500,SoundMe(),””)

tao-am-bao-khi-nhap-sai-gia-tri-trong-excel (11)

+ Bước 5: Trước khi Fill công thức xuống toàn bộ danh sách bảng tính.

tao-am-bao-khi-nhap-sai-gia-tri-trong-excel (12)

Và bây giờ thì bạn có thể Test thử, lúc này tất cả các giá trị lớn hơn 500 khi nhập vào đều sẽ được Excel cảnh báo bằng Âm báo của bạn.

tao-am-bao-khi-nhap-sai-gia-tri-trong-excel (13)

#3. Tạo âm báo khi thay đổi giá trị trong ô điều kiện

Ngoài hai cách tạo Âm báo với các giá trị lớn, nhỏ hơn và bằng tại ô tham chiếu. Bạn có thể sử dụng bộ code sau để cài đặt Âm báo khi các giá trị trong ô điều kiện được thêm hoặc bị thay đổi.

+ Bước 1: Bạn mở file Excel => rồi nhấn Alt + F11 để mở trình VBA, tại đây bạn chọn Insert => và Module.

tao-am-bao-khi-nhap-sai-gia-tri-trong-excel (14)

+ Bước 2: Rồi dán đoạn mã sau vào…

Private Sub Worksheet_Change(ByVal Target As Range)
‘Updateby Extendoffice 20161223
Dim xCell As Range
On Error Resume Next
If Target.Columns.Count = 1 Then
If Intersect(Target, Columns(1)) Is Nothing Then
Exit Sub
Else
For Each xCell In Columns(1)
On Error Resume Next
If (xCell.Value = Target.Value) And (xCell.Value <> “”) Then
Beep
Exit For
End If
Next
End If
End If
End Sub

… hộp thoại Module. Sau đó bạn thực hiện thay đổi cột tham chiếu từ A=1, B=2, C=3….

tao-am-bao-khi-nhap-sai-gia-tri-trong-excel (15)


+ Bước 3: Rồi Test thử bằng cách nhập, hoặc thay đổi giá trị tại ô tham chiếu, để được kết quả Âm báo.

tao-am-bao-khi-nhap-sai-gia-tri-trong-excel (16)

#4. Lời Kết

Vậy là xong, mình đã hướng dẫn rất chi tiết với các bạn cách thiết lập Âm báo, và tuỳ chỉnh Âm báo khi thay đổi hoặc nhập giá trị lớn hơn, bé hơn hay bằng trên file Excel một cách dễ dàng và hiệu quả rồi nhé.

Hi vọng mẹo nhỏ trong việc sử dụng code VBA để tạo âm thanh thông báo khi nhập sai dữ liệu trên file Excel này sẽ hữu ích với các bạn. Chúc các bạn thành công !

 CTV: Lương Trung – Blogchiasekienthuc.com

Note: Bài viết này hữu ích với bạn chứ ? Đừng quên đánh giá bài viết, like và chia sẻ cho bạn bè và người thân của bạn nhé !

Administrator: Kiên Nguyễn Blog

Có một câu nói của người Nhật mà mình rất thích đó là " Người khác làm được thì mình cũng làm được ". Chính vì thế mà hãy theo đuổi đam mê, thành công sẽ theo đuổi bạn ! Nếu như bạn đang gặp khó khăn và cần sự trợ giúp thì hãy comment phía bên dưới mỗi bài viết để nhận được sự hỗ trợ từ cộng đồng Blog Chia Sẻ Kiến Thức nhé.

Một vài lưu ý trước khi comment :

Thư điện tử của bạn sẽ không được hiển thị công khai. Các trường bắt buộc được đánh dấu *
Tất cả các comment của các bạn sẽ được giải đáp trong vòng 48h (thường vào buổi tối)!
Không được sử dụng từ khóa trong ô 'Name', bạn hãy dùng tên thật hoặc Nickname của bạn !
Không dẫn link sang trang web/blog khác. Xem quy định comment tại đây. Thank All!

Leave a Reply

Your email address will not be published. Required fields are marked *