Excel 资产条目-重用以前的行列A-D

我们有一个excel电子表格，用于输入硬件信息

乙二醇 Manf\Model\TYPE\ASSET\SN

现在，LAD手动输入前四列，然后使用扫描仪扫描序列号。在相当多的情况下，实际的硬件是相同的。因此，扫描第一个项目后，它将跳到下一行。然后我希望他们扫描下一个项目，以便它从扫描仪输入序列号，但由于A\B\C\D列为空，我希望它复制上一行的信息

我在玩这段代码，但自动转换低到高的作品，但不会复制前一行1-4，如果有一个值在当前行5

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Target.Value = UCase(Target.Value)
Application.EnableEvents = True
If Target.Column <> 5 Then Exit Sub
If Target.Row = Cells(65536, Target.Column).End(xlUp).Row Then
Application.EnableEvents = False
Range(Cells(Target.Row - 1, 1), Cells(Target.Row - 1, 4)).Copy
Range(Cells(Target.Row, 1), Cells(Target.Row, 4)).PasteSpecial      xlPasteFormats
Application.CutCopyMode = False
Application.EnableEvents = True
End If
End Sub

Private子工作表\u更改（ByVal目标作为范围）
Application.EnableEvents=False
Target.Value=UCase（Target.Value）
Application.EnableEvents=True
如果目标为第5列，则退出子列
如果Target.Row=单元格（65536，Target.Column）.End（xlUp）.Row，则
Application.EnableEvents=False
范围（单元格（Target.Row-1,1）、单元格（Target.Row-1,4））。复制
范围（单元格（Target.Row，1），单元格（Target.Row，4））。粘贴特殊XLPaste格式
Application.CutCopyMode=False
Application.EnableEvents=True
如果结束
端接头

---

提前感谢

到目前为止，您研究/尝试了什么？我已经准备好了电子表格，可以自动将下限转换为上限。