Try to "call" the event

=> Call Worksheet_Change(r)