Báo lỗi #NAME? khi tạo Macro (1 người xem)

[thuynhung1611]

Các anh chị nào rành về VBA giúp em với ạ!
Em có tạo 1 Marco để đếm số màu trong các ô.Nhưng khi e gửi flie sang máy khác thì nó báo lỗi #NAME?
Có các nào để xóa Marco đấy đi để tạo 1 cái mới không ạ?
Em cảm ơn ạ

 

[SA_DQ]

Bạn trích macro đó lên xem nào;

Có khi không cần xóa, mà chỉ vô hiệu hóa nó đi là được.

 

[thuynhung1611]

Function ColorFunction(rColor As Range, rRange As Range, Optional SUM As Boolean)
Dim rCell As Range
Dim lCol As Long
Dim vResult
lCol = rColor.Interior.ColorIndex
If SUM = True Then
For Each rCell In rRange
If rCell.Interior.ColorIndex = lCol Then
vResult = WorksheetFunction.SUM(rCell, vResult)
End If
Next rCell
Else
For Each rCell In rRange
If rCell.Interior.ColorIndex = lCol Then
vResult = 1 + vResult
End If
Next rCell
End If
ColorFunction = vResult
End Function
Đây ạ
e muốn xóa hết đi thì làm thế nào ạ

 

[thuynhung1611]

đây hình ảnh nó như thế này ạ

 

[giangleloi]

Các anh chị nào rành về VBA giúp em với ạ!
Em có tạo 1 Marco để đếm số màu trong các ô.Nhưng khi e gửi flie sang máy khác thì nó báo lỗi #NAME?
Có các nào để xóa Marco đấy đi để tạo 1 cái mới không ạ?
Em cảm ơn ạ

Mình nghĩ File bạn làm có macro nhưng bạn không Save lại khi gửi qua máy khác nên mới vậy. Vì file bạn gửi lên cũng đâu có Macro. Nếu chỉ muốn tô màu cho những số lớn hơn 0 như file của bạn thì xài Conditional Fomartting là giải quyết được rồi.

 

[Hau151978]

Các anh chị nào rành về VBA giúp em với ạ!
Em có tạo 1 Marco để đếm số màu trong các ô.Nhưng khi e gửi flie sang máy khác thì nó báo lỗi #NAME?
Có các nào để xóa Marco đấy đi để tạo 1 cái mới không ạ?
Em cảm ơn ạ

File của bạn lưu dưới định dạng xlsx thì macro sẽ bị xóa, bạn cần lưu dạnh xlsm.