作者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://webptt.com/m.aspx?n=bbs/Office/M.1454652479.A.B9D.html
1F：→ soyoso: 可以range.hasformula來取得是否為公式 02/05 14:18
2F：→ jie123: 網路上看很久百思不解,請問要怎麼應用呢?謝謝! 02/05 18:14
3F：→ soyoso: 配合if，target為range，在後面接上hasformula來判斷 02/05 19:58
※ jie123:轉錄至看板 ask 02/05 20:42