Пытаюсь доработать  
Private Sub Worksheet_SelectionChange(ByVal Target As Range)  
    If Target.Cells.Count > 7 Then Exit Sub  
    If Not Application.Intersect(Range("S3,AI3,AR3"), Target) Is Nothing Then  
        UserForm3.Show  
Как тут дописать, или изменить, что бы при клике на ячейке S11  
запустить      
UserForm1.Show  
 
 End If  
End Sub  
 
Подскажите пожалуйста