View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Leslieac Leslieac is offline
external usenet poster
 
Posts: 2
Default worksheet_Change

Hi,

I have written the following to open up a different user form when certain
cells are changed (The User answers "Y" to the question). This part is
working. My problem is when I reset the worksheet to the default values of
"N", the worksheet views this as a change and is popping up all the user
forms. I've been trying to add the first section (which isn't working), that
if any of the cells in the range b18:p28 are changed to "N", then do nothing.

I would appreciate any help... Leslie

Private Sub Worksheet_Change(ByVal Target As Range)


If Range("b14:p26").Cells = "N" Then Exit Sub



If Not Intersect(Target, Me.Range("g18:g26")) Is Nothing Then
With Target
frmBeltBuff.Show
End With
End If

If Not Intersect(Target, Me.Range("h18:h26")) Is Nothing Then
With Target
frmBevel.Show
End With
End If



End Sub