Hi Jindon,
One more thing please.
Instead of a if just a specific cell in Sheet2 (B10, E11) and Sheet4 (C9:C20, D10) ?

from this code:
If (Sh.Name = "Sheet2") + (Sh.Name = "Sheet4") Then Exit Sub


Thanks.