habuon060687
Thành viên chính thức


- Tham gia
- 4/5/07
- Bài viết
- 51
- Được thích
- 4
Em muốn dùng Conditional Formatting để điền dữ liệu vào cell có tô màu hoặc phương pháp nào khác cũng được. Các ac xem file đính kèm sẽ hiểu.
bạn làm đúng ý mình rồi. nhưng mình vẫn chưa làm theo được. bạn hướng dẫn từng bước làm dùm mình luôn nha.Bạn xem file đính kèm xem đúng ý chưa nhé.
Bạn xem file đính kèm xem đúng ý chưa nhé.
Người ta cần điền dữ liệu dựa vào màu chứ có bảo tô màu theo dữ liệu đâu chứ
Cái này có thể dùng chức năng Find And Replace 1 phát ra ngay
Xem file:
[video=youtube;X23675qwo9o]http://www.youtube.com/watch?v=X23675qwo9o&feature=youtu.be[/video]
Dạ, xem file bác ndu làm là đúng như ý e muốn. nhưng làm như vậy thì hơi mất công, bởi vì số cell màu là rất nhiều và không xếp theo trật tự nào hết. bác có cách nào mình định dang trước theo điều kiện không. khi mình tô màu cell thì số sẽ tự động hiển thị theo màu.
cảm ơn bác ndu nhiều.
Tức là sao đây?
Tức là cái gì có trước? SỐ có trước hay MÀU có trước
Nếu số có trước, màu tô theo số thì làm giống bài 2 (dùng Conditional Formating)
Nếu màu có trước, số được điền theo thì làm giống như tôi đã làm... Còn muốn nhanh thì lập trình thôi
Muốn nhanh thì dùng thử code này xem, chỉnh sửa vùng cần thiết trong code lại cho vừa ý.Dã, tức là màu có trước, số có sau. cách bác ndu làm e đã hiểu. và đúng với mong muốn của em. ý e hỏi là có cách nào làm nhanh hơn không. vì số cell màu của e rất nhiều. nếu thay từng màu thì rất lâu.
Public Sub GPE()
Dim Clls As Range
For Each Clls In Range("A1:Z100") '"Chỉnh địa chỉ này cho phù hợp"
If Clls.Interior.ColorIndex = 6 Then Clls.Value = 1
If Clls.Interior.ColorIndex = 33 Then Clls.Value = 2
If Clls.Interior.ColorIndex = 10 Then Clls.Value = 3
Next
End Sub
Muốn nhanh thì dùng thử code này xem, chỉnh sửa vùng cần thiết trong code lại cho vừa ý.
PHP:Public Sub GPE() Dim Clls As Range For Each Clls In Range("A1:Z100") '"Chỉnh địa chỉ này cho phù hợp" If Clls.Interior.ColorIndex = 6 Then Clls.Value = 1 If Clls.Interior.ColorIndex = 33 Then Clls.Value = 2 If Clls.Interior.ColorIndex = 10 Then Clls.Value = 3 Next End Sub
Tặng 1 code màu mè cho vui.hii, file của bác Ba Tê làm ko chê vào đâu đc. bác cho e hỏi cách lấy mã màu trong excel với ạ. bác có bảng tra mã màu thì cho e xin luôn ạ. cảm ơn bác nhiều.
Muốn nhanh thì dùng thử code này xem, chỉnh sửa vùng cần thiết trong code lại cho vừa ý.
PHP:Public Sub GPE() Dim Clls As Range For Each Clls In Range("A1:Z100") '"Chỉnh địa chỉ này cho phù hợp" If Clls.Interior.ColorIndex = 6 Then Clls.Value = 1 If Clls.Interior.ColorIndex = 33 Then Clls.Value = 2 If Clls.Interior.ColorIndex = 10 Then Clls.Value = 3 Next End Sub
Tặng 1 code màu mè cho vui.