复制 VBA 模块内的单元格范围

复制 VBA 模块内的单元格范围

我正在尝试通过单击表单按钮来复制特定工作表中的单元格区域

Sub Button1_Click()
    Sheets("Marina").Range("A1:H10").Value = Sheets("Marina").Range("A13:H22")
End Sub

在 VB 编辑器中,我使用模块 1。上面的代码就位于此处。

在此处输入图片描述

我知道在模块内引用工作表与在工作簿脚本内引用工作表不同,我必须使用模块。我该如何引用特定工作表来执行复制操作?

答案1

  1. 确实将代码移至工作表(例如:Sheet1)

  2. 完成后你可以删除模块

  3. 之后,转到您的表单对象并Right Click>Assign Macro...

  4. 在宏窗口中,您应该看到以下所有函数 sheet.[name of function]

  5. 现在,所有需要绑定到工作簿的操作都应该可以无错误地执行

相关内容