Cинтаксис кода при использовании Or

[Brucebelg]

Добрый день,

Посдкажите пожалуйста, как в данный код

Private Sub Worksheet_Change(ByVal Target As Range)

'this hides or unhides column D
If Target.Address = "$C$8" And Target.Text = "MS" Then
Range("D:D").EntireColumn.Hidden = True
Else
Range("D:D").EntireColumn.Hidden = False
End If

добавить условие проверки текста в ячеке С8 не только на "MS", но и на "MH"? пробовал так

Private Sub Worksheet_Change(ByVal Target As Range)

'this hides or unhides column D
If Target.Address = "$C$8" And Target.Text = "MS" Or Target.Address = "$C$8" And Target.Text = "MH "Then
Range("D:D").EntireColumn.Hidden = True
Else
Range("D:D").EntireColumn.Hidden = False
End If

но не сработало.

Заранее благодарю.

[nerv]

\например, так

Private Sub Worksheet_Change(ByVal Target As Range)
With Target
    If .Address = "$C$8" Then
        Columns(4).Hidden = (.Text = "MS" Or .Text = "MH")
    End If
End With
End Sub

[Казанский]

Ваш вариант тоже работает. Проверьте лишний пробел в кавычках:

If Target.Address = "$C$8" And Target.Text = "MS" Or Target.Address = "$C$8" And Target.Text = "MH" Then

Так еще можно:

If Target.Address = "$C$8" And (Target.Text = "MS" Or Target.Text = "MH") Then

[Brucebelg]

Всем огромное спасибо за помощь