将单元格从定义的SHEE SHANGE复制到活动工作表

时间:2016-02-10 11:33:05

标签: vba excel-vba excel

我需要从预定义工作表范围之间的工作表中将特定单元格值复制到当前活动表。例如,仅Sheet5和Sheet7之间的工作表。我无法指定工作表名称,因为它们尚不存在。它们将由用户根据请求通过另一个宏创建,并在创建时放置在此预定义的工作表范围内。

从本质上讲,我认为我需要以某种方式定义 Sheet5和Sheet7之间的工作簿范围。巧合的是,新的纸张总是在5到7页的纸张范围内。

1 个答案:

答案 0 :(得分:2)

您可以使用表格索引,例如

    Sub SheetIndx()
    If Sheets.Count >= 7 Then
        ActiveSheet.Range("A1:B4").Copy Sheets(6).Cells(Sheets(6).Rows.Count, "A").End(xlUp).Offset(1)
    End If
End Sub

或者实际的sheet6,无论表单的名称是什么,它仍然是sheet6,并且与工作簿中的顺序无关。

Sub Sheet()
    If Sheets.Count >= 7 Then
        ActiveSheet.Range("A1:B4").Copy Sheet6.Cells(Sheet6.Rows.Count, "A").End(xlUp).Offset(1)
    End If
End Sub
相关问题