使用VBA获取MDX数据

I'm having a hard time getting results back in Excel connecting to an MDX database. Below is my code (I am incredibly new at this, so please be patient.) I did hijack someone's error code, so that part is not mine. The query runs through but I receive no data in Excel. Any help would be appreciated. I'm having a hard time getting results back in