VBA读取Excel单元格数据,处理后再写入该表中的其他位置,怎么实现?

# 用Excel的VBA能够从Excel中读取数据,也能够实现数据写入到单元格中,但是怎么实现在一个Function中实现先读取数据,再写到表的其他单元格呢?**__

Public Function test1() As String
Dim strArray() As Variant
Dim wk_data As Variant

Set wk_data = Sheets("Sheet1")
strArray = wk_data.Range("A47:B48").Value
出现错误!! wk_data.Range("G43").Resize(UBound(strArray, 1), UBound(strArray, 2)).Value = strArray

test1 = "true"

End Function

Csdn user default icon
上传中...
上传图片
插入图片
抄袭、复制答案,以达到刷声望分或其他目的的行为,在CSDN问答是严格禁止的,一经发现立刻封号。是时候展现真正的技术了!
立即提问