
excel使用VBA编程后运行,提示“424 要求对象”
代码是这样的PrivateSubWorksheet_Activate()Sheets2.Cells.Font.ColorIndex=2IfApplication.Inpu...
代码是这样的
Private Sub Worksheet_Activate()
Sheets2.Cells.Font.ColorIndex = 2
If Application.InputBox("请输入密码:") = laohu Then
Range("A1").Select
ActiveSheet.Cells.Font.ColorIndex = 56
Else
MsgBox "密码错误,即将退出!"
Sheets1.Select
End If
End Sub
提示第二行有误
本人新手加屌丝一枚,望大侠详细指点! 展开
Private Sub Worksheet_Activate()
Sheets2.Cells.Font.ColorIndex = 2
If Application.InputBox("请输入密码:") = laohu Then
Range("A1").Select
ActiveSheet.Cells.Font.ColorIndex = 56
Else
MsgBox "密码错误,即将退出!"
Sheets1.Select
End If
End Sub
提示第二行有误
本人新手加屌丝一枚,望大侠详细指点! 展开
展开全部
Sheets2改成Sheet2,下面的Sheets1改成Sheet1,还有laohu 应该是 "laohu" ,当然也可能是变量
追问
太棒了!修改之后好了!谢谢!
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询