将多个工作簿工作表合并到目标工作表中

Question

使用MS-Excel 2007，我注意到在https://api.cakephp.org/2.8/class-FormHelper.html#_select代码中，我注意到在运行时目标的第一行始终为空。这是为什么？谢谢。

Answer 1

而不是

Range("A65536").End(xlUp).Offset(1, 0).PasteSpecial

你可以使用类似的东西

Dim LastUsedCell As Range
Set LastUsedCell = Range("A" & Rows.Count).End(xlUp)

If IsEmpty(LastUsedCell) Then
    LastUsedCell.PasteSpecial
Else
    LastUsedCell.Offset(1, 0).PasteSpecial
End If

从空白纸上的第1行开始。

Answer 2

请考虑此选项。

https://www.rondebruin.nl/win/addins/rdbmerge.htm

如果您还有其他问题，请回复。