Hide Worksheet If Certain Cells Empty

I am trying to write a code that would hide when certain cells in the worksheet are empty. Also the sheet name should start with a -.

This is the code i have so far. The thing is that the sheet will always hide. The criteria on the cells doesnt work.


Sub Hide_all_filled_Templates()
Dim ws As Worksheet
Application.DisplayAlerts = False
For Each ws In Worksheets
If Left(ws.Name, 1) = "-" Then
If Not Range("I9").Value = "" Or Range("K9").Value = "" Or Range("M9").Value = "" Or Range("O9").Value = "" Then ws.Visible = False
End If
Next
Application.DisplayAlerts = True

End Sub
The code now hides all shees starting with "-". It does not take the cell criteria into account. Why?

Other point is that these cell references are just a few of what it should really be. How do I make this easier for myself to write the code. Point is that these cells come in row 9 (like the example) then in row 11 then in row 15, 17, 21,23, etc. Also the columns jump with uneven steps.