Tks bro nhéBạn nhấn tổ hợp phím Ctrl+F rồi làm theo hình nhé.
View attachment 46557
View attachment 46558
Nhấn vào find All nhé
View attachment 46559
Thử dùng code này để tô màu nền (xanh) cho những Cell bị Merge để xem cho lẹ.Khi mà mình kéo công thức thì vô tình có một hàng nó bị Merge cell không áp dụng được.Thế thì làm cách nào để xác định đuọc vị trí Ô bị Merge.trong khi đó chức năng Go to-->Special.. thì không có?
Sub ToMauMergeCells()
Dim Tim As Range
For Each Tim In ActiveSheet.UsedRange
If Tim.MergeCells Then
Tim.Interior.ColorIndex = 28
End If
Next
End Sub
cái này sử dụng thể nào ạ?Thử dùng code này để tô màu nền (xanh) cho những Cell bị Merge để xem cho lẹ.
Mã:Sub ToMauMergeCells() Dim Tim As Range For Each Tim In ActiveSheet.UsedRange If Tim.MergeCells Then Tim.Interior.ColorIndex = 28 End If Next End Sub
Copy code bài 8 rồi làm như sau:Em làm mãi mà không được ạ. Bác nào chỉ giúp e với được k ạ? E cảm ơn.
Bài đã được tự động gộp:
cái này sử dụng thể nào ạ?