Have you entered my code in standard module.Dont see any reason to put
in worksheet_change event.That is the reason for loop.