excel 宏撤销的问题 来个高手啊
发布网友
发布时间：2022-04-20 00:03
共2个回答
热心网友
时间：2023-06-24 22:12
Range("A1")~Range("A5")可以使用Range("A1:A5")表示，例如你的语句可以简化为：
Option ExplicitPrivate undotemp(1 To 5, 1 To 1) As Variant
Private Sub CommandButton1_Click()
undotemp = Range("A1:A5")
Range("A1:A5") = undotemp
Application.OnUndo "撤销", "myundo"
End Sub
Private Sub CommandButton2_Click()
Range("A1:A5") = undotemp
End Sub
追问那如果我是多个表框的情况下呢 就是我上面说的需要记录的那些表框 能弄一下吗 马上采纳
热心网友
时间：2023-06-24 22:12
用数组
arr1 =range("B8:E100")range("B8") =arr1(1,1)
range("E100")= arr1(93,4)
