小编Ban*_*erM的帖子

我试图让我的电子表格在插入新行时自动采用以前的行格式和公式。

我读过您可以在哪里设置工作表以在进行更改时自动运行代码，但是我很难让代码正常工作。

我尝试了以下操作，每次插入新行时，它都会不断添加一行，直到出现错误并且我必须强制退出：

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Range("A1:D25") = ActiveCell.EntireRow.Insert Then
        Cells(1, 2).Value = 10
    End If 
End Sub

我添加了Cell Value = 10看看它是否有效。这只是一个测试，但它仍然失败。

有谁知道可能的解决方案？