your event handler changes values thus triggering more events that it
needs to handle..

try like:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
application.enableevents=False
'your code
application.enableevents=True
end sub



--
keepITcool
| www.XLsupport.com | keepITcool chello nl | amsterdam


Daggi wrote :

I'm trying to alter multiple pivot tables and its working great as
long as i enter a number higher or equal to 100 in the target cell. I
have to be able to use numbers between 0 an 100 to. What am i doing
wrong?

My code:



I realy hope you can help!