hỏi về cách tìm ô có dữ liệu giống nhau trong cột

[cup5000]

hix mình đang tìm cách gộp những ô giống nhau về giá trị rồi format tự động, mà code mình làm sai quá, bí về thuật toán lun, mong anh em giúp

cụ thể:

cột A ta có trường như sau

mục đích đóng khung như file đính kèm 2

 

[viehoai]

hix mình đang tìm cách gộp những ô giống nhau về giá trị rồi format tự động, mà code mình làm sai quá, bí về thuật toán lun, mong anh em giúp

cụ thể:

cột A ta có trường như sau
View attachment 99434
mục đích đóng khung như file đính kèm 2


View attachment 99433

Hình như như thế này thì mới đúng
Nếu như vậy không liên quan về box "Lập trình với excel"

 

[cup5000]

hix sao kg liên quan, hix đang cần lắm đoá anh, tuần nào cũng căng mắt làm cả ngàn items

 

[viehoai]

hix sao kg liên quan, hix đang cần lắm đoá anh, tuần nào cũng căng mắt làm cả ngàn items

Tóm lại File 1 và file 2 có giống nhau không? Hay file 2 chỉ là thể hiện kết quả của file 1?
Vì tôi thấy dữ liệu file 2 giống file 1, đoán bạn cần kẽ ô theo dữ liệu giống nhau và làm bằng Conditional Formatting

 

[cup5000]

Vì tôi thấy dữ liệu file 2 giống file 1, đoán bạn cần kẽ ô theo dữ liệu giống nhau và làm bằng Conditional Formatting ==> chính xát nhưng làm tự động

 

[nhapmon]

theo mình hiểu thì file 1 là dữ liệu gốc của bạn (và nó đã được sắp xếp theo từng loại).
và file 2 là kết quả của file 1 sau khi border cho từng nhóm, phải vậy ko.
bạn xem thử đoạn code mình quay lại bằng record macro (có sửa đôi chút)

Sub Macro3()
For i = 2 To Sheet1.[a60000].End(3).Row
If Range("A" & i).Value <> Range("A" & i).Offset(-1).Value Then
With Range("A" & i).Borders(xlEdgeTop)
.LineStyle = xlContinuous
.Weight = xlThick
.ColorIndex = xlAutomatic
End With
End If
Next
End Sub

hoặc
Sub Macro4()
'
Dim rng As Range
For Each rng In [a1:a2000]
If rng.Value <> rng.Offset(1).Value Then
rng.Borders(xlEdgeBottom).Weight = xlThick
End If
Next

End Sub

còn nếu file 1 chưa được sắp xếp thì thêm lệnh sort vào.

 

[hungpecc1]

Vì tôi thấy dữ liệu file 2 giống file 1, đoán bạn cần kẽ ô theo dữ liệu giống nhau và làm bằng Conditional Formatting ==> chính xát nhưng làm tự động

Xem thử file đính kèm !

 

[cup5000]

thanks anh nhieu de nghiên cứu code

 

[nguyen minh hai hai]

Ai biết chỉ giúp mình tìm các ô có cùng định dạng. Cụ thể các ô cột E trong file
Cảm ơn anh em nhiều!

 

[CHAOQUAY]

Ai biết chỉ giúp mình tìm các ô có cùng định dạng. Cụ thể các ô cột E trong file
Cảm ơn anh em nhiều!

Dùng hàm TYPE() trong cột D, kết quả giống nhau là cùng kiểu

 

[TongDe]

Ai biết chỉ giúp mình tìm các ô có cùng định dạng. Cụ thể các ô cột E trong file
Cảm ơn anh em nhiều!

Hoặc hàm ISTEXT, ISNUMBER... trong Conditional Formatting.