☰

如何编写 Excel 宏以在两张工作表之间复制选定的数据行？

tag-icon • tag-icon microsoft-excel microsoft-excel-2010 vba macros
如何编写 Excel 宏以在两张工作表之间复制选定的数据行？

我在整个 VBA 领域并没有太多经验，我知道宏是如何工作的，但这超出了我的能力范围。基本上，正如我在标题中所述，我需要编写一个宏，将选定的行或单元格从一张表复制到另一张表。

例如，第一张工作表包含一个表格，其中包含一些数据。用户选择行或所需单元格，通过快捷键运行宏，宏将选定的数据复制到工作表 2 并将其粘贴到所需行（我们将其设为第 22 行）。此外，如果第 22 行（A:22）中包含一些数据，则将数据粘贴到下一行（23）。

我希望我已经表达得足够清楚了。

我非常感谢任何能得到的提示或帮助。

答案1

在开发人员-> Visual Basic 下，将以下内容放入新模块中：

Sub CopySelection()
  Dim xlSel As Excel.Range
  Set xlSel = Excel.Application.Selection

  xlSel.Copy Excel.Application.Sheets("Sheet2").Range("A1")
End Sub

然后，在开发人员->宏下，选择子项，单击选项，并分配一个键。

相关内容