Tô đậm hàng đang chứa ô hiện hành ? (1 người xem)

[BNTT]

Có một bạn hỏi tôi có một vấn đề như sau:

Bạn ấy muốn khi chọn một ô nào đó, thì nguyên cả hàng đang chứa ô đó được tô đậm lên, hay là định dạng kiểu gì cũng được, nhưng riêng cái hàng đang chứa ô hiện hành mà thôi. Và nếu như chọn ô ở hàng khác, thì cái hàng vừa bị định dạng lúc nãy sẽ trở lại bình thường, còn hàng đang có ô được chọn lúc này lại được "tô đậm" lên.

Tôi có nghĩ đến chuyện dùng Conditional, nhưng mò hoài mà không biết làm thế nào.
Hình như phải can thiệp bằng VBA.

Có bạn nào giúp tôi trả lời câu hỏi này với.

 

[anhtuan1066]

Dùng Coditional Formating với công thức ROW()=CELL("ROW") là dc (Bấm F9 mổi khi chuyển sang dòng khác)
Nếu muốn tự động thì cho vào sự kiện Selection_Change

 

[salam]

Bác đặt name:
Dong=GET.CELL(2)=ROW()

Trong CF bác đặt =Dong với format mà Bác cần.

 

[BNTT]

Cảm ơn những đáp án ở trên.
Tuy nhiên, có cách nào để khỏi phải nhấn F9 không?
Bác ANHTUAN có nói dùng sự kiện gì đó, bác giúp dùm với.

 

[DOSNET]

Hình như copy đoạn này anh ah, em không rành VBA lắm !

Private Sub worksheet_Selectionchange(ByVal target As Range)
ActiveSheet.Calculate
End Sub

 

[anhtuan1066]

Nhiều cách dùng code lắm! Thử file này

 

[Mr Okebab]

Cảm ơn những đáp án ở trên.
Tuy nhiên, có cách nào để khỏi phải nhấn F9 không?
Bác ANHTUAN có nói dùng sự kiện gì đó, bác giúp dùm với.

Khi thiết lập cho từng sheet xong, bác dặt dòng code này vào thisworkbook:

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    Sh.Calculate
End Sub

Thân!

 

[ndu96081631]

Hình như copy đoạn này anh ah, em không rành VBA lắm !

Cái của DOSNET và Mr Okebab không được đâu! Vì nó sẽ làm mất chức năng Copy paste!
Thử xem biết liền
Đơn giãn nhất là dùng:
Application.ScreenUpdating = True

 

[DOSNET]

Cái của DOSNET và Mr Okebap không được đâu! Vì nó sẽ làm mất chức năng Copy paste!
Thử xem biết liền
Đơn giãn nhất là dùng:
Application.ScreenUpdating = True

Chính xác là ko copy và paste được, cách của anh "Bắp" cũng vậy !
Vậy dùng chính cái này để bảo vệ bảng tính, không cho Copy và Paste được ko bác Tuấn? Nó có ảnh hưởng đến các điều kiện lviệc nào khác không ?

 

[cadafi]

Có một bạn hỏi tôi có một vấn đề như sau:

Bạn ấy muốn khi chọn một ô nào đó, thì nguyên cả hàng đang chứa ô đó được tô đậm lên, hay là định dạng kiểu gì cũng được, nhưng riêng cái hàng đang chứa ô hiện hành mà thôi. Và nếu như chọn ô ở hàng khác, thì cái hàng vừa bị định dạng lúc nãy sẽ trở lại bình thường, còn hàng đang có ô được chọn lúc này lại được "tô đậm" lên.

Tôi có nghĩ đến chuyện dùng Conditional, nhưng mò hoài mà không biết làm thế nào.
Hình như phải can thiệp bằng VBA.

Có bạn nào giúp tôi trả lời câu hỏi này với.

Cái này em nhớ trên GPE mình có nhiều rồi mà anh. Anh xài thử add-Ins này xem sao!

 

[chibi]

Dùng GridHighLighter của TuanVNUNI thử xem.

 

[BNTT]

Cái này em nhớ trên GPE mình có nhiều rồi mà anh. Anh xài thử add-Ins này xem sao!

Cảm ơn Ca_dafi.
Cái Addin này hiệu quả thì có, nhưng thẩm mỹ thì.. không thích lắm.
Có cách nào để sửa được cái kiểu định dạng của nó không? Ví dụ như tô màu cho hàng như cái Code của anh Tuấn đưa lên?

Sẵn đây em cũng xin hỏi anh Tuấn, trong Code anh đưa lên, mặc định tô màu xanh nhạt nhạt cho dòng chứa ô hiện hành, vậy muốn đổi thành màu khác thì phải làm như thế nào?

 

[TKT]

Sẵn đây em cũng xin hỏi anh Tuấn, trong Code anh đưa lên, mặc định tô màu xanh nhạt nhạt cho dòng chứa ô hiện hành, vậy muốn đổi thành màu khác thì phải làm như thế nào?

Anh chọn vùng từ A1:H1 vào Format -> Conditional formatting chọn màu khác là OK,sau đó dùng chổi sơn chép định dạng cho những dòng còn lại.

 

[SA_DQ]

Sẵn đây em cũng xin hỏi anh Tuấn, trong Code anh đưa lên, mặc định tô màu xanh nhạt nhạt cho dòng chứa ô hiện hành, vậy muốn đổi thành màu khác thì phải làm như thế nào?

Tại đây cũng có HighLight & muốn đổi màu thì thay số 35 bằng số khác <56 là được

Sửa lại đường dẫn:

http://www.giaiphapexcel.com/forum/showthread.php?p=53145#9

 

[BNTT]

Tôi đã tìm ra cách format cái RowLiner 4.0 rồi.
Có thể có nhiều bạn chưa biết cái này. Vậy xin giới thiệu lại ở đây luôn:

Trang web để download: http://www.cpearson.com/Excel/RowLiner.htm

Minh họa cửa sổ thiết lập định dạng:

Tuy nhiên, thành thật mà nói, tôi thích cái của AnhTuan1066 hơn.
Bởi vì nó cho tô màu dòng chứa ô hiện hành, và chỉ những ô có dữ liệu thôi.
Còn cái Rowliner này thì nó gạch tuốt hết chiều ngang bảng tính (không đẹp lắm)

 

[TKT]

Tại đây cũng có HighLight & muốn đổi màu thì thay số 35 bằng số khác <56 là được
http://www.giaiphapexcel.com/forum/showthread.php?p=76351#9

Bác Sa ơi đường link trên bị sao ấy click vào báo như thế này:
"Địa chỉ Ðề tài không đúng. Nếu địa chỉ này là chính xác, vui lòng gửi thư cho administrator"

 

[anhtuan1066]

Nếu là tôi hướng dẩn cho người khác thiết lập Highlight này thì tôi sẽ:
-Chỉ cách dùng Conditional Formating trước
-Tiếp theo muốn tự động thì thêm code vào
-Tiếp theo nữa sẽ cải tiến code (nếu code có vấn đề)
Từ thấp lên cao, như vậy ít ra ta biết được ta đã làm gì

1> Mang về xài cái "xịn" nhất và khỏi cần biết nó chứa gì trong code
2> Tự mình làm lấy cái đơn giãn nhất dù ko dc hay
Tùy sở thích mỗi người!
(Tôi vẩn thích cái tôi tự làm, hay dở gì cũng là của tôi. Tôi hiểu nó và tôi có thể tùy biến dc nó)

 

[BNTT]

Nếu là tôi hướng dẩn cho người khác thiết lập Highlight này thì tôi sẽ:
1- Chỉ cách dùng Conditional Formating trước
2- Tiếp theo muốn tự động thì thêm code vào
3- Tiếp theo nữa sẽ cải tiến code (nếu code có vấn đề)
Từ thấp lên cao, như vậy ít ra ta biết được ta đã làm gì

Em bổ sung thêm tí nữa:
4- Nếu code đã ổn, tạo mới một bảng tính, nhập code vào trong This Workbook
5- Lưu thành file *.xla để làm Add-in cho Excel của mình.
6- Chèn Addin mới tạo này vào trong bộ Addin của Excel.
Bây giờ, để xài cái này, chỉ cần chọn dãy, gọi Conditional Formating ra, nhập công thức vào. Là xài. Khỏi cần làm gì trong Alt-F11 hết.

 

[pmhoang]

http://www.cpearson.com/excel/Colors.aspx
line nay hình như nói về màu của hàm hay cong thuc gì đó. Bằng tiếng anh. Mình kém quá ko địch hết được. Anh em GPE xêm chắc là có ích lợi trong đó. xin chỉ giáo cho mình với

Em bổ sung thêm tí nữa:
4- Nếu code đã ổn, tạo mới một bảng tính, nhập code vào trong This Workbook
5- Lưu thành file *.xla để làm Add-in cho Excel của mình.
6- Chèn Addin mới tạo này vào trong bộ Addin của Excel.
Bây giờ, để xài cái này, chỉ cần chọn dãy, gọi Conditional Formating ra, nhập công thức vào. Là xài. Khỏi cần làm gì trong Alt-F11 hết.

1. Anh BNTT nói lưu file.xla đề lả add-in cho Execl, nhưng sao mình lam theo, mà chẳn thấy file xla có tác dụng gì cả?

2. File RowLiner.xla trong phần VB có password. mình đã tạo cho nó 1 password mới là " hoang " Anh em hãy dùng password này mở phần VB của nó ra nguyên cứu và chỉnh sữa lại theo ý của mình.
Theo mình thì chỉnh lại làm cho thay đổi màu là dẻ nhìn nhất (màu xanh lá cây đậm nhất có trong dãy màu của excel), bỏ 2 đường gạch chéo đi.
3. Xin các bạn giúp sữa lại file đó (AnhTuan1066 nhớ gốp ý kiến vào nhe) camon.

 

[BNTT]

1. Anh BNTT nói lưu file.xla đề lả add-in cho Execl, nhưng sao mình lam theo, mà chẳn thấy file xla có tác dụng gì cả?

2. File RowLiner.xla trong phần VB có password. mình đã tạo cho nó 1 password mới là " hoang " Anh em hãy dùng password này mở phần VB của nó ra nguyên cứu và chỉnh sữa lại theo ý của mình.
Theo mình thì chỉnh lại làm cho thay đổi màu là dẻ nhìn nhất (màu xanh lá cây đậm nhất có trong dãy màu của excel), bỏ 2 đường gạch chéo đi.
3. Xin các bạn giúp sữa lại file đó (AnhTuan1066 nhớ gốp ý kiến vào nhe) camon.

Bạn mới đọc số 5 à, còn số 6 nữa bạn ơi... Bạn đã kích hoạt cái xla đó vào trong bộ Add-in của Excel chưa ?