![](/img/trans.png)
[英]Combining 2 “Private Sub Worksheet_Change(ByVal Target As Range)” into 1
[英]Worksheet_Change(ByVal Target As Range), Target always equals Nothing
感謝您的所有幫助!
我正在使用Worksheet_Change(ByVal Target As Range)
事件,而不是 Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
事件。 經過一些測試,我意識到我的事件會觸發,但是參數Target
始終設置為Nothing
。 一些代碼和圖片休假。
Private pNet As Range
Private pProposedValue As Range
'EVENT HANDLERS
'--------------
Private Sub Worksheet_Change(ByVal Target As Range)
If pProposedValue Is Nothing Then
ElseIf pNet Is Nothing Then
ElseIf Target Is pNet Then
pProposedValue.Value2 = Target.Value2
Me.Calculate
End If
End Sub
Is
不適用於檢查一個范圍變量是否與另一個范圍變量引用相同的范圍。
即使Target Is pNet
指向相同范圍,也將為false。
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.