Help with macro to streamline Orientate on surface command

Would this be of any help?