只好用VBA解决,如附件所示: 1、定义一个名称“Temp”,引用位置填“=0”; 2、添加工作表的Change事件: Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) Dim arrTemp If Target.Address = "$B$1" Then arrTemp = Evaluate(ActiveWorkbook.Names("Temp").RefersTo) ActiveWorkbook.Names("Temp").RefersTo = "=" & Target Target = arrTemp End If End Sub
呵呵 这种就是正在审核中,如果着急打电话催一下,如果显示人工决策,那基本就没戏了