第1个回答 2019-07-31
请按步骤操作:
选中单元格b1,同时按ctrl和f3进入名称编辑器,新建,名称处输入
abc,下面引用位置处输入
=evaluate(a1)
确定,关闭。
在b1输入
=abc
公式向下复制。
第2个回答 2010-03-29
右键点击表标签,选“查看代码”将下面代码粘贴进去:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Column = 3 Then
ActiveCell.Value = Cells(ActiveCell.Row, 1) * Cells(ActiveCell.Row, 2)
End If
End Sub
第3个回答 2010-03-29
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 3 Then Target.Value = Target.Offset(, -1) * Target.Offset(, -2)
End Sub