Блог

Что не так с моим кодом? То, что я пытаюсь сделать, — это удалить «нулевые» значения во всех рабочих листах, за исключением нескольких. это работает только для текущего листа, и я не знаю, почему.

 
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
    If ws.Name <> "Content" And ws.Name <> "1D" And ws.Name <> "2D" Then
        For Each cell In Range("A1:X200")
        If cell.Value = "0" Then cell.Clear
        Next
    End If
Next ws```


End Sub