A B C
1 0
2 0
3 1 OK
4 0
5 0
6 0
7 1 0K
8 0
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column = 1 Then
ThisRow = Target.Row
If Target.Value = 1 Then
Range("B" & ThisRow) = "OK"
Else
End If
End If
End Sub
A欄如果不是公式，數字由0改1會顯式OK
A欄如果是excel公式，0變1不會顯式OK
請問VBA公式如何修正為:A欄如果是excel公式，0變1會顯式OK