给你个简单的,代码可以复制图下边的。复杂的需要静下心来好好学习,网上很多教程。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If [B1] < 8 Then
[C1] = "小"
Else
If [B1] = 8 Then
[C1] = "中"
Else
[C1] = "大"
End If
End If
End Sub
就这意思:如果B1<8,那么C1=小
否则,如果B1=8,那么C1=中
否则C1=大