从本质上讲,我认为我需要以某种方式 define a Workbook Range between Sheet5和Sheet7 . 巧合的是,新的纸张总是在5到7页的纸张范围内 .
1 回答
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
1 回答
您可以使用工作表索引,如
或者实际的sheet6,无论表单的名称是什么,它仍然是sheet6,并且与工作簿中的顺序无关 .