không cho nhập dữ liệu đặc biệt vào cell trong sheet

Liên hệ QC

minhbinhdinh

Thành viên chính thức
Tham gia
15/8/08
Bài viết
65
Được thích
3
Chào mọi người.Chúc sức khỏe.
Tôi có ý này mong mọi người giúp cho :
tôi không muốn cho nhập 1 từ " minh" vào bất kì cell nào trong 1 sheet thì làm thế nào, còn vd " ngoc minh "... thì được
Mong mọi người giúp cho.
 
Bạn nghiên cứu lập trình sự kiện trong ô, từ đó đưa ra các điều kiện nhập.

Ví dụ tham khảo:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim TenSheet As String
TenSheet = UCase(Range("D2"))
If Not Intersect(Range("D2"), Target) Is Nothing Then
ActiveSheet.Name = TenSheet
ActiveSheet.Tab.Color = vbWhite
End If
End Sub
 
Upvote 0
Đề xuất cho bạn thêm 1 fương cách, như sau:

Cũng là macro sự kiện thôi:
PHP:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
 If Not Intersect(Target, Cells) Is Nothing Then
   If Target.Value = "Minh" Then Target.Value = "Hay Nhap Lai"
 End If
End Sub

Lúc này trên bất kỳ ô nào trên trang tính ta có thể nhập "minh" hay "Minh.",. . . chứ nhập mỗi "Minh" thì sẽ được thay bằng dòng khác cảnh báo liền.

Những mong đúng í bạn.
 
Upvote 0
Chào mọi người.Chúc sức khỏe.
Tôi có ý này mong mọi người giúp cho :
tôi không muốn cho nhập 1 từ " minh" vào bất kì cell nào trong 1 sheet thì làm thế nào, còn vd " ngoc minh "... thì được
Mong mọi người giúp cho.
Cái này dùng Validation là hiệu quả nhất, không cần đến lập trình đâu
Ví dụ
- Muốn cấm từ minh trong vùng A1:D10
- Vậy ta quét chọn vùng này
- Vào menu Data\Validation
- Khung Allow, chọn mục Custom
- Gõ vào khung Formula công thức: =COUNTIF(A1,"minh")=0
- Tab Error Alert có thể gõ 1 thông báo gì đó
---------------
Thí nghiệm xem
 
Upvote 0
Chào mọi người.Chúc sức khỏe.
Tôi có ý này mong mọi người giúp cho :
tôi không muốn cho nhập 1 từ " minh" vào bất kì cell nào trong 1 sheet thì làm thế nào, còn vd " ngoc minh "... thì được
Mong mọi người giúp cho.
Dùng Validation với công thức này cũng được nè bạn:
Mã:
=A1<>"minh"
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom