Fw: [算表] 紀錄曾經是1的位置

[jie123 (jie123)]

※ [本文轉錄自 Office 看板 #1Mj3m_kT ]

作者: jie123 (jie123) 看板: Office
標題: Re: [算表] 紀錄曾經是1的位置
時間: Fri Feb  5 14:07:56 2016


        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













--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 60.248.19.151
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1454652479.A.B9D.html


※ 發信站: 批踢踢實業坊(ptt.cc)
※ 轉錄者: jie123 (118.169.70.197), 02/05/2016 20:42:12
※ 編輯: jie123 (118.169.70.197), 02/05/2016 20:43:13