You are in a big loop. When a change event changes the worksheet a new
copy of the change event occurs. so you need to disable evvents before
you make a change and then re-enabble the evvent at the end of the
macro


Private Sub Worksheet_Change(ByVal Target As Range)

Application.EnableEvents = False

'your code here

Application.EnableEvents = True

end sub


--
joel
------------------------------------------------------------------------
joel's Profile: 229
View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=173413

Microsoft Office Help