Tạo add-in đổi màu cells khi chọn cells đó

[svxd49]

Trên diễn đàn đã có code để thay đổi màu của cells khi các cells đó được chọn:

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Sh.Cells.Interior.ColorIndex = xlNone
Target.Interior.ColorIndex = 20
End Sub

Tôi xin hỏi có cách nào tạo thành 1 add-in để khi khởi động excel, lệnh trên có tác dụng luôn. Hiện tại, khi cần dùng tôi đều phải copy lại đoạn code trên vào trong VBA để sử dụng. Tôi đã tạo 1 file .xla chứa đoạn code trên nhưng mà ko sử dụng được. Mong mọi người giúp đỡ!

 

[viehoai]

Trên diễn đàn đã có code để thay đổi màu của cells khi các cells đó được chọn:


Tôi xin hỏi có cách nào tạo thành 1 add-in để khi khởi động excel, lệnh trên có tác dụng luôn. Hiện tại, khi cần dùng tôi đều phải copy lại đoạn code trên vào trong VBA để sử dụng. Tôi đã tạo 1 file .xla chứa đoạn code trên nhưng mà ko sử dụng được. Mong mọi người giúp đỡ!

Theo như bạn nói vậy thì bất cứ file Excel nào khi mở ra cũng đều thực hiện việc ấy? có bất tiện không(chưa nói có được không) ?. Theo mình nghĩ để thuận tiện cho bạn mỗi lần copy code đỡ nhọc nhằn thì vẫn làm 1 addin tạo ra menu (hay button) khi nhấn lệnh thì copy code ấy vào sheet hiện hành, sau khi copy song bạn thực hiện điều như bạn muốn. Bạn nghĩ sao?

 

[svxd49]

Theo như bạn nói vậy thì bất cứ file Excel nào khi mở ra cũng đều thực hiện việc ấy? có bất tiện không(chưa nói có được không) ?. Theo mình nghĩ để thuận tiện cho bạn mỗi lần copy code đỡ nhọc nhằn thì vẫn làm 1 addin tạo ra menu (hay button) khi nhấn lệnh thì copy code ấy vào sheet hiện hành, sau khi copy song bạn thực hiện điều như bạn muốn. Bạn nghĩ sao?

Oh, ý tưởng quá hay. Bạn có thể giúp mình thực hiện điều này được chứ. Mình ko biết cách tạo. Cảm ơn bạn nhiều.

 

[Hai Lúa Miền Tây]

Bạn vào bài Hỏi cách để khi chọn 1 cell thì cả row và column đều đổi màu rồi chế lại xài.

 

[svxd49]

Bạn vào bài Hỏi cách để khi chọn 1 cell thì cả row và column đều đổi màu rồi chế lại xài.

Theo tôi hiểu, nếu làm theo hướng dẫn của bài trên thì vẫn phải copy code vào trong file mình cần sử dụng. Mục đích của tôi là muốn nó thường trực ở trong excel, có thể áp dụng với bất kỳ file nào khi cần. Tôi thấy ý tưởng của bạn Viehoai là hay nhất nhưng tôi ko biết cách thực hiện. Mong mọi người trợ giúp.

 

[Achye]

Sao khi xài code - click thì cells đổi màu ở trên. Khi click thì các ô đã có màu còn lại bị mất màu hết nhỉ ? Nguyên sheet chỉ có ô mình click vào là có màu thôi ?
Có cách nào khôi phục màu các cells còn lại ko ?