Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Thank You Bob,
Arturo
"Bob Phillips" wrote:
Hi Arturo,
You could just use an Orm but I use the Intersect method
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Not Intersect(Target, Range("D11,G11")) Is Nothing Then
MsgBox "Sell"
End If
End Sub
--
HTH
RP
(remove nothere from the email address if mailing direct)
"Arturo" wrote in message
...
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$D$11" Then
MsgBox "Sell"
End If
End Sub
Is there a way to stipulate multiple target addresses?
"$D$11" Or "$G$11" Then... does not work.
|