插入带有target.column问题的公式

Question

我遇到的问题是让公式进入所选单元格旁边的单元格。 我一直在遇到应用程序定义或对象定义的错误

以下是我遇到问题的代码

Private Sub Worksheet_Change(ByVal Target As Range)
        If Target.Column = 2 Then            
        Sheets("Scan").Cells(Target.Row, 3) = "=(INDEX(Roster!C,MATCH(Scan!RC1,Roster!C4,0))"
        End If
End Sub

Answer 1

只使用其他工作表中的单元格更改一个单元格和公式。为了使其工作，公式应该是A1格式。

此外，您需要表明它是.Formula

的公式

第三，缺少紧密的括号。

Private Sub Worksheet_Change(ByVal Target As Range)
        If Target.Column = 2 Then
        Sheets("Scan").Cells(Target.Row, 3).Formula = "=(INDEX(Roster!D" & Target.Row & ",MATCH(Scan!D" & Target.Row & ",Roster!G" & Target.Row & ",0)))"
        End If
End Sub

单元格地址基于R1C1。我可能有错误的双重检查。