
excel vba中存在的问题 5
Sub按钮3_Click()SelectCase([b5]-[b4])CaseIs=1[b8]=Sheets(3).Cells(tq1([b4]),3)CaseIs=7[...
Sub 按钮3_Click()
Select Case ([b5] - [b4])
Case Is = 1
[b8] = Sheets(3).Cells(tq1([b4]), 3)
Case Is = 7
[b8] = Sheets(3).Cells(tq1([b4]), 5)
Case Else
[b8] = tb([b5] - [b4]) + (tc([b5] - [b4]) - tb([b5] - [b4])) / (dz([b5] - [b4]) - dy([b5] - [b4])) * (([b5] - [b4]) - dy([b5] - [b4]))
End Select
End Sub
这是我的第一个过程...想请问一下有什么问题吗..它把我的过程名标黄了,说该命令将终止调试器?
求大神解答...... 展开
Select Case ([b5] - [b4])
Case Is = 1
[b8] = Sheets(3).Cells(tq1([b4]), 3)
Case Is = 7
[b8] = Sheets(3).Cells(tq1([b4]), 5)
Case Else
[b8] = tb([b5] - [b4]) + (tc([b5] - [b4]) - tb([b5] - [b4])) / (dz([b5] - [b4]) - dy([b5] - [b4])) * (([b5] - [b4]) - dy([b5] - [b4]))
End Select
End Sub
这是我的第一个过程...想请问一下有什么问题吗..它把我的过程名标黄了,说该命令将终止调试器?
求大神解答...... 展开
1个回答
展开全部
Case Is = 1不对
应该是
CASE 1
CASE 7
CASE ELSE
应该是
CASE 1
CASE 7
CASE ELSE
追问
我改了一下!但是 还是刚刚那个情况诶...
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询