方法一：myarr = Application.Transpose(range(“a1:a5”))结果：可循环方法二：首先声明数组变量类型Dim myarr as Variant然后myarr = range(“a1:a5”)结果：可循环打印，但索引时下标越界
