分二点说明问题吧。
一、以你的举例,似乎可以锁定A1不可以输入内容,即可工作表保护
二、以你的举例,如果不做工作表保护的话,那只能使用vba,当激活非A1单元格,即在非A1单元格输入内容时,让A1值等于B1+10
代码如下
Private Sub worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then Exit Sub
[a1] = [b1] + 10
End Sub
添加下列宏代码
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 1 And Target.Column = 2 Then ‘判断B1数值变化
Cells(1, 1).Value = "=B1+10" ’重设A1公式
End If
End Sub
这样 A1 单元格可以任意输入,而当B1单元格数值变化时,自动重设A1=B1+10,并计算结果填入A1。
如有问题,请在线联系我。
不太明白你的意图,能补充下吗?
五楼是高手,你给他吧,呵呵。
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
[a1] = [b1] + 10
End Sub
1. 可能工作表锁住了
2. 用宏命令
3.关了再打开试试
这个只有用宏才能实现