Vba Object Variable With Block Not Set In Stone