Как скрыть листы с ячейкой u1 = x

Question

Если я хочу скрыть вкладки с u1 = x, как мне это сделать? У меня есть это, но он просто скрывает все страницы, а не только те, которые имеют u1 = x

Sub Hide_Sheets_Containing()
  Dim wks As Worksheet

  For Each wks In ActiveWorkbook.Worksheets
    If Not (wks.Range("u1") = "X") Then
      wks.Visible = xlSheetHidden
    End If
  Next
  Set wks = Nothing
End Sub