第1个回答 2013-11-20
公式做不到,用vba吧.
先把宏安全性调到中或低(菜单里-工具-宏-安全性)
按alt+F11
双击左边你这个表的名字
右边代码中复制
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count = 1 And Target.Column = 5 and Target.row>1 Then
Cells(Target.Row, Target.Column - 1) = "=(" & Target.Value & ")*0.0015"
End If
End Sub
保存,然后修改E列,或者不用修改,双击进去然后回车就行了.试试