用Excel VBA从数组中填充表格需要很长时间

I have this Excel VBA code that is taking more than 5 seconds for dumping a 166 row size array in a workbook sheet. I tried to hide the worksheet but all I get is the "waiting" icon for each single cell.I have this Excel VBA code that is taking more