Need to convert to function

[hohlick]

this

1. Optimize code (exclude redundant referrals)
2. Create inner function to invoke with sheet name (relations) and column('s)