Excel表格实现判断赋值?
发布网友
发布时间:2022-05-02 02:34
我来回答
共3个回答
热心网友
时间:2022-06-27 01:48
把以下代码复制到你的工作表的代码框里面,你所说的一切要求都可解决
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
For i = 1 To 50
If [a1] = 1 Then Cells(i, 3) = Cells(i, 2)
If [a1] = 2 Then Cells(i, 4) = Cells(i, 2)
If [a1] = 3 Then Cells(i, 5) = Cells(i, 2)
If [a1] = 4 Then Cells(i, 6) = Cells(i, 2)
If [a1] = 5 Then Cells(i, 8) = Cells(i, 2)
Next
Application.EnableEvents = True
End Sub
热心网友
时间:2022-06-27 01:48
你在C1里面输入=if($A$1=1,b1,"这个不知道要取哪个值了"),再往下拉
热心网友
时间:2022-06-27 01:48
不知道你在说些什么,想帮你都帮不上,