Sub 将数组写入单元格()
Dim arr As Variant
arr = Split("别怕@Excel VBA@其实很简单@叶枫@ExcelHome", "@")
Dim i As Integer
For i = 0 To UBound(arr)
Cells(2 * (i + 1) - 1, "A").Value = arr(i)
Next i
End Sub

上一篇：excel怎么做表格：Range对象的Value、Text和Formula属性的区别 下一篇： 设置只有在指定单元格中输入内容后才能关闭工作簿

郑重声明：本文版权归原作者所有，转载文章仅为传播更多信息之目的，如作者信息标记有误，请第一时间联系我们修改或删除，多谢。