Vba中的泛化

我是Vba for excel编程新手（以前在access中工作过），希望在理解如何概括excel方面得到帮助。我从internet和stack overflow中尝试了许多Vba代码，下面是我需要帮助的地方

如何复制粘贴数据。我有一个主表（20列）和每天有大约5列的小表（每个小表可能不同）。现在我需要将这些图纸映射到父图纸。 如；我映射了一个50行5列的文件，因此在父工作表中，所有50行的15列都将为空。对于下一页，其他一些列将为空。我只是被困在如何选择特定的列每一次

x.Worksheets("Sheet1").Activate
Range("A65536").Select **' What does A65536 mean**
ActiveCell.End(xlUp).Select
lastrow = ActiveCell.Row
Range("A2:A" & lastrow).Copy y.Worksheets("Sheet1").Range("a65536").End(xlUp).Offset(1, 0)
Range("B2:B" & lastrow).Copy y.Worksheets("Sheet1").Range("b65536").End(xlUp).Offset(1, 0)

---

上面的代码对我来说不起作用，因为我在某些行中的列也有空白值，因此下一个值占用了这些空格，这对我来说是错误的。提前谢谢。

@PieterGeerkens:我认为在SO中使用这个吓人的词是非常不可取的。显然你知道（或者你可以计数）子图纸中包含多少列和行。您知道父工作表中子数据的顺序。因此，您可以使用您的顺序计算行数和列数，并在此基础上将值粘贴到父工作表。@JLILIAman：幽默地说，当提到我自己时，我没有看到问题所在。注意：在代码的第一行，你选择了你的工作表，接下来的三行，你可以找到最后一行（即A65536：对于旧版本的excel，是A列的最后一行，在新版本中，它非常大），然后你按列复制范围。因此，在我映射第一个子文件之后（例如50行数据），有些列将完全为空（在我的情况下，第一个文件是15行）。现在，当我尝试映射第二个文件时，我需要数据从第51行开始，它确实从第51行开始，但是需要数据的列在数据到达前50个空白列时是空白的。很抱歉，这么愚蠢，但我不能正确地呈现它