Alg. 1: I expect there is no sheet having a codename "EAMPVPMSChart". A worksheet can have two names, the one you see on the tab (shown as "Name" property) and the one you can use in code directly (shown as "(Name)" property).
Alg. 2: Not sure, it appears to work for me
Alg. 3: ThisWorksheet is not an existing object, you're looking for ActiveSheet
Alg.4: Not sure
Alg. 5: I suspect wsInput is the problem, it is treated as a variable and was not declared.