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属性的区别 下一篇: 设置只有在指定单元格中输入内容后才能关闭工作簿
郑重声明:本文版权归原作者所有,转载文章仅为传播更多信息之目的,如作者信息标记有误,请第一时间联系我们修改或删除,多谢。