如何将精确的单元格复制到另一个 Excel 文件中?

如何将精确的单元格复制到另一个 Excel 文件中?

我需要将某一行中的一些单元格复制到另一个 Excel 表中。目标表中的单元格不在同一行。

起始行正在改变,这就是我的想法如下的原因:运行宏,选择起始行并让宏将所有必需的单元格复制到另一个 Excel 文件。

这可能吗? 怎么做?

答案1

以下是将整行复制到另一张工作表的几个不同示例。您可以根据自己的需要进行调整。您没有提供太多细节,但关键似乎在于找出您要复制的行以及要将其粘贴到哪里。您必须提供数据的详细信息,我们才能帮助您解决此问题。

Sub CopyToAnotherSheet()

    Dim wsSource As Worksheet
    Dim wsTarget As Worksheet

    Set wsSource = Worksheets("Sheet1")
    Set wsTarget = Worksheets("Sheet2")

    'Copy the last row to the last row
    wsSource.Rows(wsSource.UsedRange.Rows.Count).Copy wsTarget.Rows(wsTarget.UsedRange.Rows.Count + 1)

    'Copy the last row to a new first row
    wsTarget.Rows(1).Insert xlDown
    wsSource.Rows(wsSource.UsedRange.Rows.Count).Copy wsTarget.Rows(1)

    'Copy a particular row to another particular row
    wsTarget.Rows(7).Insert xlDown
    wsSource.Rows(3).Copy wsTarget.Rows(7)

End Sub

相关内容