Mình hỏi trên một page khác được một bạn viết giúp đoạn code này có thể dùng để xóa tất cả các ô có error ở tất cả các sheet trong một workbook. Share cho bạn nào cần dùng.
Sub loop_shts()
Dim wks As Worksheet
Dim rng As Range
For Each wks In ThisWorkbook.Worksheets
Set rng = Nothing
On Error Resume Next
Set rng = wks.UsedRange.SpecialCells(xlCellTypeFormulas, 16)
If Not rng Is Nothing Then
rng.Value = ""
End If
Next
End Sub