Tự động tô màu trong Excel như thế nào????

Liên hệ QC

lenhu038

Thành viên mới
Tham gia
25/12/06
Bài viết
10
Được thích
4
Nghề nghiệp
Thu kho
Em có một việc muốn hỏi các Pro, không biết đăng ở đây có đúng không nữa.
Em muốn trong Excel khi mình xử lý số liệu thì di vào ô nào thì cột và hàng của ô đó đổi màu có được không mục đích của em ở đây là để khi nhập dữ liệu em nhìn dữ liệu cho đỡ nhầm. Ví dụ em đang ở Cell D10 thì từ vị trí D10 đó cột D và dòng 10 sẽ tự động có màu khác, khi em chuyển sang ô khác thì màu ở các cột khác cũng sẽ tự động đổi và Cột dòng và ô vừa rồi (vd D10) lại bình thường. cái này có dùng hàm gì được không hả các Bác.
Thank you!!
 
Em có một việc muốn hỏi các Pro, không biết đăng ở đây có đúng không nữa.
Em muốn trong Excel khi mình xử lý số liệu thì di vào ô nào thì cột và hàng của ô đó đổi màu có được không mục đích của em ở đây là để khi nhập dữ liệu em nhìn dữ liệu cho đỡ nhầm. Ví dụ em đang ở Cell D10 thì từ vị trí D10 đó cột D và dòng 10 sẽ tự động có màu khác, khi em chuyển sang ô khác thì màu ở các cột khác cũng sẽ tự động đổi và Cột dòng và ô vừa rồi (vd D10) lại bình thường. cái này có dùng hàm gì được không hả các Bác.
Thank you!!

Thử đoạn code này xem, chủ yếu là để nhìn cho rõ chứ đôi lúc nó cũng gây phiền phức.

PHP:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    On Error Resume Next
    Cells.Interior.ColorIndex = 0
    ActiveCell.EntireRow.Interior.ColorIndex = 8
    ActiveCell.EntireColumn.Interior.ColorIndex = 8
    Application.CutCopyMode = True
End Sub
Xem File, nhớ Enables Macros.
 

File đính kèm

Lần chỉnh sửa cuối:
Chào các anh chi, em có 02 vấn đề này mà tim mấy ngày vẫn chưa được:
1. Cty em mới giao nhiệm vụ là theo dõi công nợ của phòng kinh doanh (theo hợp đồng kinh tế). anh chị nào có file quản lý công nợ theo hợp đồng bằng excel thì cho em với, xin gửi mail giúp em: nguyenquyen@tanphatcorp.com.
2. Em muốn lập bảng tính excel có cột ngày đến hạn khách phải thanh toán. Có nghĩa là công thức làm sao khi tới hạn ngày đó thì ô đó tự động nổi màu VD: ngày 07/10/2009 ký hợp đồng (HĐ) sau 7 ngày làm việc phải thu tiền thì ô đó sẽ nỗi màu đỏ báo hết hạn HĐ.
Em không biết đăng câu hỏi ở mục nào nên nhờ anh chị chỉ dùm em.
Trân thành cảm ơn.
 
Chào các anh chi, em có 02 vấn đề này mà tim mấy ngày vẫn chưa được:
1. Cty em mới giao nhiệm vụ là theo dõi công nợ của phòng kinh doanh (theo hợp đồng kinh tế). anh chị nào có file quản lý công nợ theo hợp đồng bằng excel thì cho em với, xin gửi mail giúp em: nguyenquyen@tanphatcorp.com.
2. Em muốn lập bảng tính excel có cột ngày đến hạn khách phải thanh toán. Có nghĩa là công thức làm sao khi tới hạn ngày đó thì ô đó tự động nổi màu VD: ngày 07/10/2009 ký hợp đồng (HĐ) sau 7 ngày làm việc phải thu tiền thì ô đó sẽ nỗi màu đỏ báo hết hạn HĐ.
Em không biết đăng câu hỏi ở mục nào nên nhờ anh chị chỉ dùm em.
Trân thành cảm ơn.
Câu 1 thì mình không biết
Câu 2 bạn làm thế này:
Vào FOMAT=> CONDITIONAL FOTMATTING => CELL VALUE IS - EQUAL TO - trong ô công thức bạn nhập =now()=10/17/2009
Phần fomat bạn cho màu muốn xuất hiện
Chúc bạn thành công
 
Câu 1 thì mình không biết
Câu 2 bạn làm thế này:
Vào FOMAT=> CONDITIONAL FOTMATTING => CELL VALUE IS - EQUAL TO - trong ô công thức bạn nhập =now()=10/17/2009
Phần fomat bạn cho màu muốn xuất hiện
Chúc bạn thành công
Bạn làm như thế thì vĩnh viễn nó không đổi màu đâu :-=
Có hai cái sai:
- Cách nhập ngày tháng
- Bạn thử gõ công thức =NOW()=TODAY() bạn sẽ hiểu
 
Bạn làm như thế thì vĩnh viễn nó không đổi màu đâu :-=
Có hai cái sai:
- Cách nhập ngày tháng
- Bạn thử gõ công thức =NOW()=TODAY() bạn sẽ hiểu
Cám ơn bạn nhiệu Tại yêu cầu của người ta có như thế nên mình không nghĩ cái phần sau
Rất cám ơn
 
Cách làm Conditional Formatting thì thôi không phải bàn, chắc bạn biết rồi!
Phần Formular is bạn nhập vào công thức
=DATEDIF(C1,TODAY(),"d")>6

(chứ không phải là day360 như trước vì đây là hàm dựa trên chuẩn tháng 30 ngày trong một năm) - Trong danh sách hàm Excel không tự động hiển thị hàm Datedif nên tôi nghĩ là chỉ sử dụng được hàm này trong VBA. Giờ biết thêm được là hàm này cũng dùng được ngay trong Sheet. Thành thật cảm ơn bạn Duongdv

Với giả định C là cột chứa ngày hợp đồng được ký và ngày được nhập theo đúng chuẩn (mm/dd/yyyy)
Ô số 1 là ô đầu tiên của cột đó.
Kể từ ngày số 7 thì bắt đầu nhắc việc
Bạn chỉ cần chọn toàn vùng dữ liệu cần lập định dạng (cột C) có điều kiện và nhập vô công thức đó là xong.
Hi vọng là ví dụ trên giúp được bạn!
'=============================================
Xin lỗi các bạn vì vụ hơi cẩu thả trong lần trả lời trước!
Tôi cũng chỉ đọc qua loa phần giải thích hàm của Excel nên không để ý lắm!
Rất cảm ơn bạn duongdv đã nhắc
 
Lần chỉnh sửa cuối:
Cách làm Conditional Formatting thì thôi không phải bàn, chắc bạn biết rồi!
Phần Formular is bạn nhập vào công thức
=DAYS360(C1,TODAY())>6
Với giả định C là cột chứa ngày hợp đồng được ký và ngày được nhập theo đúng chuẩn (mm/dd/yyyy)
Ô số 1 là ô đầu tiên của cột đó.
Kể từ ngày số 7 thì bắt đầu nhắc việc
Bạn chỉ cần chọn toàn vùng dữ liệu cần lập định dạng (cột C) có điều kiện và nhập vô công thức đó là xong.
Hi vọng là ví dụ trên giúp được bạn!
Nếu làm theo cách của bạn thì theo tôi bạn nên thay hàm DAYS360() bằng hàm DATEDIF().
 
Thử đoạn code này xem, chủ yếu là để nhìn cho rõ chứ đôi lúc nó cũng gây phiền phức.

PHP:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    On Error Resume Next
    Cells.Interior.ColorIndex = 0
    ActiveCell.EntireRow.Interior.ColorIndex = 8
    ActiveCell.EntireColumn.Interior.ColorIndex = 8
    Application.CutCopyMode = True
End Sub
Xem File, nhớ Enables Macros.
Cam ơn bạn nhiều nhé, nhưng làm thế này thì không thể copy hoặc paste duoc dung không?? cách này tôi cũng đã thử rồi
Bạn còn cách nào hay hơn không??
 
Cam ơn bạn nhiều nhé, nhưng làm thế này thì không thể copy hoặc paste duoc dung không?? cách này tôi cũng đã thử rồi
Bạn còn cách nào hay hơn không??

Bởi vậy mình mới nói nó phiền toái, cách làm bằng VBA thì mình chịu, tuy nhiên vẫn có thể Copy và Paste được, chỉ có điều lâu hơn chút xíu.

Khi Copy thay vì Ctrl C 1 lần thì bạn Ctrl C 2 lần --> Hiện ra cửa sổ Clipboard --> Chọn vị trí cần Paste --> Click vào giá trị mong muốn ở cửa sổ Clipboard, vậy là Paste, chậm hơn vài giây.:-=
 
Mấy hôm nay em tìm không thay chuyên mục này.
Em cảm ơn các anh chị đã giúp em, nhưng em làm không tốt lắm
Công thức em nhập la:
Conditional Formatting : =NOW()=TODAY()
Formular is: =DATEDIF(C1,TODAY(),"d")>6
Em phải nhập cả 2 công thức thì nó mới nổi màu.
Và nổi màu hết các ô chọn công thức, nổi cả ô em chưa nhập ngày nữa. Vậy cho em hỏi như vậy có dúng không ạ?
 
Mấy hôm nay em tìm không thay chuyên mục này.
Em cảm ơn các anh chị đã giúp em, nhưng em làm không tốt lắm
Công thức em nhập la:
Conditional Formatting : =NOW()=TODAY()
Formular is: =DATEDIF(C1,TODAY(),"d")>6
Em phải nhập cả 2 công thức thì nó mới nổi màu.
Và nổi màu hết các ô chọn công thức, nổi cả ô em chưa nhập ngày nữa. Vậy cho em hỏi như vậy có dúng không ạ?
Bạn đâu cần phải 2 công thức như vậy nếu điều kiện của bạn là =DATEDIF(C1,TODAY(),"d")>6 (Số ngày >6 thì đổi màu). Bạn xem trong file đính kèm
 

File đính kèm

Mình có file mẫu này với mục đích muốn đổi màu cho chữ hoặc cả ô khi giá trị nhỏ hơn ô tương ứng,
 
Mìnhđang dùng công thức báo ngày thủ công ( tự động báo khi đến ngày )
Nhưng mình muốnnhững ô báo đó được tô màu khi nó đến hạn nhảy lên
bạn nào giúp mình chỗ này với nhé !
thank's

FILE kèm nhé!
 

File đính kèm

Cho mình hỏi tý, xin lỗi trước vì nếu post không đúng chỗ

Ví dụ mình muốn đánh giá chỉ tiêu "đạt" hay "không đạt". Nếu chỉ tiêu không đạt sẽ hiện là "không đạt" và ô chứa nó sẽ tự động chuyển sang màu đỏ.

Có bạn nào biết chỉ giùm mình nhe
 
Cho mình hỏi tý, xin lỗi trước vì nếu post không đúng chỗ

Ví dụ mình muốn đánh giá chỉ tiêu "đạt" hay "không đạt". Nếu chỉ tiêu không đạt sẽ hiện là "không đạt" và ô chứa nó sẽ tự động chuyển sang màu đỏ.

Có bạn nào biết chỉ giùm mình nhe
Tại ô đánh giá bạn dùng IF để hiển thị Đạt hay Không Đạt: =if(ô nào đó thỏa mãn,"Đạt","Không Đạt").
Quét chọn vùng cột Đánh giá mà bạn vừa đặt công thức, nhấn vào Conditional Formatting > New Rule > Format only cells that contain > Cell Value > equal to > ="Không Đạt" > Format > Fill > chọn màu đỏ > OK > OK.
 
Cho mình hỏi chút.
Mình làm giống như vậy nhưng mà sau khi đặt lệnh xong thì nó tự động đổi màu luôn! Chứ ko giống như là ngày >6 thì mới đổi màu!
Không biết mình làm sai ở đâu nhỉ??
Tks bạn!
 
Web KT

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

Back
Top Bottom