View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
Ron de Bruin Ron de Bruin is offline
external usenet poster
 
Posts: 11,123
Default Change Event Problem

Try this

Public Emp As Boolean

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Range("A1:A10"), Target) Is Nothing Then
If Emp < True Then
MsgBox "YourCode or YourMacroName"
End If
End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Emp = False
If Not Application.Intersect(Range("A1:A10"), Target) Is Nothing Then
If Target.Value = "" Then Emp = True
End If
End Sub




--
Regards Ron de Bruin
http://www.rondebruin.nl


"mastermind" wrote in message oups.com...
That isn't quite what I was looking for. I need the macro to fire
every time except when the initial value of the cell is " " (nothing).
When the user opens the sheet for the first time it will be blank.
They will then populate certain fields with data. I don't want the
macro to fire while they are inputing the information...only if they
decide to go back and change something they have already answered. I
hope that is clearer. I don't know how else to explain it.