Không cho phép nhập dữ liệu

[tuandtd2008]

Em có gửi file đính kèm xin các pác chỉ giáo. Cám ơn!

 

[salam]

Bạn dùng chức năng validation nhé.

 

[Po_Pikachu]

Dùng VBA được không bạn?

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("B:C")) Is Nothing And Cells(Target.Row, 1) <> 1 Then
    Application.Undo
    End If
End Sub

Xem file nha!
Thân.

 

[ndu96081631]

Bạn dùng chức năng validation nhé.

Thêm cái "tô màu" nữa Salam ơi

 

[tuandtd2008]

File của ndu96081631 đã theo ý em, nhưng trong 1 ô em tạo 2 Validation không được. Các Pac xem tiếp file đình kèm giúp em nha.

 

[Po_Pikachu]

Một ô thì 1 Validation thôi bạn à! Hai cái là điều không thể được?
Vậy ý bạn muốn gì mà phải dùng 2 cái?
Bạn nên nói ra mục đích làm việc này đi. Vậy sẽ có hướng giải quyết thỏa đáng nhất.
Thân.

 

[ndu96081631]

File của ndu96081631 đã theo ý em, nhưng trong 1 ô em tạo 2 Validation không được. Các Pac xem tiếp file đình kèm giúp em nha.

Có thể làm được mà cũng có thể làm không được ---> Vậy bạn nói rõ thêm 1 chút thì tôi sẽ cho bạn biết yêu cầu này có thể thực hiện được không? ---> rất có khả năng cái bạn cần là 1 Validation động ---> Nó sẽ cho ra nhiều list tùy thuộc vào 1 điều kiện thay đổi nào đó

 

[tuandtd2008]

Vấn đề em nói ở trong file đính kèm, các pac xem có cách nào giúp em với, cám ơn các pac!

 

[Po_Pikachu]

Đã làm được theo ý của bạn.
Bạn xem file nha!
List thì nằm trong Name đó (Insert -> Name -> Define..).
Thân.

 

[tuandtd2008]

Cám ơn pac Po_Pikachu, nhưng em muốn mỗi lần chọn "Trung gian" thì dữ liệu cũ của 2 ô liên quan tự động xóa đi luôn. Xem giúp em tiếp nhé

 

[salam]

Dùng thử CT dưới xem.

=IF($A2="Trung gian","",IF($A2="Gian Tiep",I$3,I$4))

 

[ndu96081631]

Dùng thử CT dưới xem.

=IF($A2="Trung gian","",IF($A2="Gian Tiep",I$3,I$4))

Nếu dùng công thức thì sao xài Validation được Salam ơi!
Vấn đề này tôi nghĩ chỉ có thể dùng VBA mà thôi!

 

[Po_Pikachu]

Đây kết hợp VBA lần cuối đây.
Thân.

 

[salam]

Nếu dùng công thức thì sao xài Validation được Salam ơi!
Vấn đề này tôi nghĩ chỉ có thể dùng VBA mà thôi!

Vậy thì viết CT trước rồi validation sau. Nếu không thì VBA vậy.

 

[tuandtd2008]

Pac Po_Pikachu ơi file của pac vẫn chưa ổn rồi. Khi em chọn "Trung gian" thì các ô SODUAN và "So Task" vẫn cho phép ta nhập dữ liệu vào. Pac xem tiếp giúp em với

 

[Po_Pikachu]

File khong cho nhap du lieu.xls này của mình đã sữa phần đó rồi mà!
Bạn tải lại xem kỷ đi. khi cột Loại = "Trung Gian" thì cột B và C sẽ bị xóa hết đó. Bạn sẽ thấy code bằng cách nhấn phải chuột vào tên Sheet1 chọn View Code.
Nếu bạn vẫn thấy code mà không có chạy gì hết thì có thể Security của bạn đang ở chế độ High. Bạn chỉnh lại như sau: Vào Tools -> Macro -> Security -> chọn Low -> OK.
Rồi mở lại file sẽ rõ.
Thân.

 

[tuandtd2008]

Ui xin lỗi Po_Pikachu, mình bị nhầm file. Cám ơn pac