geopf,
You will need to test Target to see if it is the right range to make a
change.
Opions would be (among others):
If Target.column = 3 Then .....
or
If Target.address = "$A$12" Then ...
or
(assuming you have a named range "MultRange" on the sheet)
Dim Isect as Range
Dim nmRng as Range
Set NamedRng =Sheets("Sheet1").Range("MultRange")
Set Isect = Intersect(Target, NamedRng)
If Not Isect Is Nothing then
'Do your calculation on the target cell(s) here
End if
Hope this helps.
Alex J
"goepf" wrote in message
...
Thanks Alex,
Now an additional question:
Is it possible to apply these code only for a section of the Worksheet?
Or do I have to test the "target" location before executing the
calculation?
Thanks so far!
------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~View and post usenet messages directly from http://www.ExcelForum.com/
~~Now Available: Financial Statements.xls, a step by step guide to
creating financial statements