85问答库 > wps中用vba将一个工作表中的数据一键保存到别一个工作表中，代码出现下标越界错误，求教

wps中用vba将一个工作表中的数据一键保存到别一个工作表中，代码出现下标越界错误，求教

2025-03-25 00:21:39

推荐回答（4个）

回答1：

把销售单，依次保存到记账这个表？
代码粘贴到销售单这个表里
销售单应该有计算公式，用了一个简单的数组
Sub 保存销售单()
arr = Range("a5:f" & Range("A65536").End(xlUp).Row)
X = Sheets("记账").Range("c65536").End(xlUp).Row
Sheets("记账").Cells(X + 1, "c").Resize(Range("A65536").End(xlUp).Row - 4, 6) = arr
Y = Sheets("记账").Range("c65536").End(xlUp).Row
Sheets("记账").Range("A" & X + 1 & ":" & "a" & Y) = [B2]
Sheets("记账").Range("B" & X + 1 & ":" & "B" & Y) = [B3]
Sheets("记账").Select
End Sub

回答2：

真是蛋疼，没有记账工作表，只有记帐工作表

回答3：

能文本发一下代码吗？看起有点累人。

回答4：

你的代码是有问题。