Excel 根据另一张图纸中的行数向下复制行

Excel 根据另一张图纸中的行数向下复制行,excel,vba,Excel,Vba,我复制并修改了这个宏,将工作表“Margin”中的第3行(A列到AZ列)复制到工作表“Raw_data”中有数据的行数,但我得到了一个 运行时424错误 阅读•什么是原始数据和边距?您是在VB编辑器中为这些创建了VBA名称,还是这些只是选项卡上的图纸名称。如果这些是选项卡上的名称,则必须使用工作表(“原始数据”)。请澄清。原始数据和页边距是图纸名称是的,但有两种不同的命名系统。Excel中的VBA代码名(您使用的)和选项卡名。由于两种命名系统完全独立,因此图纸的选项卡名称和代码名称不相同。如果重

我复制并修改了这个宏,将工作表“Margin”中的第3行(A列到AZ列)复制到工作表“Raw_data”中有数据的行数,但我得到了一个

运行时424错误


阅读•什么是
原始数据
边距
?您是在VB编辑器中为这些创建了VBA名称,还是这些只是选项卡上的图纸名称。如果这些是选项卡上的名称,则必须使用
工作表(“原始数据”)
。请澄清。原始数据和页边距是图纸名称是的,但有两种不同的命名系统。Excel中的VBA代码名(您使用的)和选项卡名。由于两种命名系统完全独立,因此图纸的选项卡名称和代码名称不相同。如果重命名选项卡,它不会更改其代码名。因此,请澄清。
Sub EndRow_Stuff()

    Dim EndRow As Long

    ' sets EndRow to last cell in column A's row number
    EndRow = Raw_Data.Range("A" & Rows.Count).End(xlUp).Row

    ' autofill to range set by EndRow in Sheet1
    Margin.Range("B2").AutoFill Destination:=Range("A3:AZ" & EndRow), Type:=xlFillDefault

End Sub