插入一行并复制格式，但仅适用于某些列

Question

我使用以下代码在双击时在单元格下插入一行，并从上方复制格式和公式。但是，我希望它仅从A：K列复制公式和格式。

我尝试了几种不同的方法，但是不断出现错误。我敢肯定，对于周围的人来说，这将是一个简单的解决方法，我只是一遍又一遍，应该如何调整代码？ -请帮助

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Cancel = True
    Target.Offset(1).EntireRow.Insert
    Target.EntireRow.Copy Target.Offset(1).EntireRow
    On Error Resume Next
    Target.Offset(1).EntireRow.SpecialCells(xlConstants).ClearContents
End Sub

Answer 1

这是您想要的吗？

COPY failed: stat /var/lib/docker/tmp/docker-builder737799611/usr/bin/yes: no such file or directory

...如果是这样，添加错误检查和任何其他要求，希望一切顺利。