2016-03-04 70 views
1

我想了解是否有可能有类似下面的代码:从Worksheet_Change(目标)内调用Worksheet_SelectionChange(目标)

Private Sub Worksheet_Change(ByVal Target As Range) 

    If Cells(6, 3).Value = "x" Then 

     Worksheet_SelectionChange (Target) 

    end if 

End sub 

Private Sub Worksheet_SelectionChange(ByVal Target As Range) 

    MsgBox "Worksheet_SelectionChange" 

End Sub 

我收到错误:

运行时间错误“424” - 需要对象。

请帮我了解

谢谢

回答

0

使用

Call Worksheet_SelectionChange(Target) 

,而不是仅仅

Worksheet_SelectionChange(Target)