Case < > "Value", but Add "Value2" in the same case.. dude..

Hi!! Good Morning!

I have a doubt in using the following macro:

Private Sub CommandButton25_Click()
Dim rnArea As range
Dim rnCell As range

Set rnArea = Sheets("sheet2").range("D9", range("D65536").End(xlUp))
Sheets("sheet2").range("D:D").Interior.ColorIndex = 0
  For Each rnCell In rnArea
     With rnCell
        If Not IsError(.Value) Then
      Select Case .Value
          Case ""
            .Interior.ColorIndex = 3
          Case Is <> "PZ"
             .Interior.ColorIndex = 3

      End Select
      End If
   End With
Next
End Sub

Works fine in the case <> "PZ".
But I require also add that if you have "MT", leave it valid.

If I add the macro function:

Case Is <> "PZ" & <> "MT"
              . Interior.ColorIndex = 3

But it doesn't work, any ideas?

Thank you!
Best Regards!!