求助excel VBA实现,A1单元格必须输入内容,A2才能输入内容
2个回答
展开全部
下面程序只针对某个表,如Sheet1。
鼠标右击该表的名称(如Sheet1),选择“查看代码”,粘贴下列代码:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$1" Then
If Cells(1, 2) <> "" Then
If Cells(1, 1) = "" Then
MsgBox "A1 不能为空" '此句可不要
Cells(1, 2) = ""
Cells(1, 2).Select
End If
End If
End If
End Sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询