excel里面怎么判断一个单元格的不同年条件选择不同的计算公式

excel里面怎么判断一个单元格的不同年条件选择不同的计算公式
假如说从A1到A10
A1= A 时 A10=A7*A8*A9
A1=B 时 A10=A6*A8*A9 这里我是这么做的A10=IF(A1="A",A7*A8*A9,A6*A8*A9)
但若A1=C是 A10=A5*A8*A9,就是当A1指定更多值时 怎么办?
同时要求,A1=A时,A2到A4是可以编辑的,A5,A6要被锁定,无法输入
A1=B时 ,A2到A4,A5要求被锁定
A1=C时,A2到A4 ,A6 A7要求被锁定

先回答：
假如说从A1到A10
A1= A 时 A10=A7*A8*A9
A1=B 时 A10=A6*A8*A9 这里我是这么做的A10=IF(A1="A",A7*A8*A9,A6*A8*A9)
但若A1=C是 A10=A5*A8*A9,就是当A1指定更多值时 怎么办?
A10=(A1="A")*A7*A8*A9+(A1="B")*A6*A8*A9+(A1="C")*A5*A8*A9
如此等等
再问： 那么第二个问题呢，要求单元格被锁定，我搞不定VBA啊！
再答： 用如下VBA程序 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then ActiveSheet.Unprotect Select Case Range("A1").Value Case "A" Cells.Select Selection.Locked = False Selection.FormulaHidden = False Range("A5:A6").Select Selection.Locked = True Selection.FormulaHidden = True ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True ActiveSheet.EnableSelection = xlUnlockedCells Case "B" Cells.Select Selection.Locked = False Selection.FormulaHidden = False Range("A2:A5").Select Selection.Locked = True Selection.FormulaHidden = True ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True ActiveSheet.EnableSelection = xlUnlockedCells Case "C" Cells.Select Selection.Locked = False Selection.FormulaHidden = False Union(Range("A2:A4"), Range("A6:A7")).Select Selection.Locked = True Selection.FormulaHidden = True ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True ActiveSheet.EnableSelection = xlUnlockedCells Case Else End Select End If End Sub 程序也许还可简化，我现在只求解决问题。