只能vba实现
Private Sub Worksheet_Change(ByVal Target As Range)
Dim q As Long
q = Target.Text
If Target.HasFormula Then
Else
Target.Value = "=" & q & "/4"
End If
End Sub
结果是你输入任意值都会自动显示=对应值/4
如图,目标是A1~A10单元格,除数是5。1、在B1单元格输入除数“5”,右键,复制。2、选中A1~A10单元格,依次点击“编辑”-“选择性粘贴”3、在“运算”选项中选择“除”。4、确定,完成。可以删除输入到B1单元格的“5”。