luuhonghai
Thành viên mới

- Tham gia
- 1/2/17
- Bài viết
- 32
- Được thích
- 4
Cái này dùng CF (Conditional Formating) cũng được mà bạn, thế nhưng file mà tô màu kiểu này nhanh phải đi khám mắt với điều trị rối loạn "triều đình" lắm á!Em muốn xin code tô màu theo vùng (từ cột B -> cột L) khi điền giá trị ở cột A. Màu được tô theo bảng tham chiếu. Em cảm ơn các anh, chị!
Muốn code thì code đây:Em muốn xin code tô màu theo vùng (từ cột B -> cột L) khi điền giá trị ở cột A. Màu được tô theo bảng tham chiếu. Em cảm ơn các anh, chị!
Sub Macro1()
Sheets("PHIDV").Range("R3:R9").Copy
Sheets("PHIDV").Range("B3:L9").PasteSpecial Paste:=xlPasteFormats
Application.CutCopyMode = False
End Sub
Hihi. 1 xíu nữa chủ thớt nói nếu dữ liệu đích lộn xộn cơ, Chứ không 1 nèo như kia ấyMuốn code thì code đây:
Mã:Sub Macro1() Sheets("PHIDV").Range("R3:R9").Copy Sheets("PHIDV").Range("B3:L9").PasteSpecial Paste:=xlPasteFormats Application.CutCopyMode = False End Sub
như bác trên nói anh ạ. Dữ liệu đích nó lộn xộn và khoảng 1000 dòng cơ ạMuốn code thì code đây:
Mã:Sub Macro1() Sheets("PHIDV").Range("R3:R9").Copy Sheets("PHIDV").Range("B3:L9").PasteSpecial Paste:=xlPasteFormats Application.CutCopyMode = False End Sub
Em muốn xin code tô màu theo vùng (từ cột B -> cột L) khi điền giá trị ở cột A. Màu được tô theo bảng tham chiếu. Em cảm ơn các anh, chị!
Em cảm ơn bác nhiều ạ.Chờ code xịn nhé. Code này dùng tạm sống sót qua ngày thôi. Mới mót hôm qua, số bạn thơm đấy.
Được cái ưu điểm là chỉ copy (các loại L) được 1 lần thôi.![]()
![]()
Bài đã được tự động gộp:
Code mót được nên chưa hoàn hảo đâu. Mấy cái change này còn lung tung, mình chưa rõ lắm, chưa cho copy liên tục được. Với lại code cũng dài lê thê.Em cảm ơn bác nhiều ạ.
Không biết các loại L này to, nhỏ, tròn, méo, đen trắng ra sao nhưng cứ có dùng là tốt rồi.các loại L
Bạn dùng CF với công thức này:Em xin phép gửi vấn đề của em vào topic này nhé. Anh chị chỉ giúp em cách format thanh tiến độ trong bảng tiến độ em đính kèm theo đây nhé. Mục tiêu là khi em nhập ngày "Bắt đầu" và ngày "Kết thúc" thì thanh thời gian tự đổi màu đúng số lượng ngày như đã nhập ạ. Cảm ơn anh chị nhiều,
=AND(G$5>=$D5,G$5<=$F5)
Mình làm được rồi bạn ạ. Cảm ơn bạn nhiều,Bạn dùng CF với công thức này:
Mã:=AND(G$5>=$D5,G$5<=$F5)