Excel 存储用户对数据验证警告消息VBA的响应
我正在根据系统的输入变量创建一个数据上传模板,并需要验证以确保正确上传 我对使用VBA的用户进行了列表数据验证,并向其发送了警告消息,但如果用户需要为其数据添加其他选项,则可能需要添加此列表。系统会提示用户告知他们输入的值不在列表中,并询问他们是否确定该值不在列表中 Excel默认警告弹出窗口的标准按钮为“是”和“否”。我希望在变量中捕获用户对此弹出窗口的响应,因此如果用户选择“是”,我希望突出显示单元格,以提示工作表收件人在上传工作表之前将此选项添加到系统中 我希望要求足够明确。我目前的验证VBA如下所示:Excel 存储用户对数据验证警告消息VBA的响应,excel,vba,Excel,Vba,我正在根据系统的输入变量创建一个数据上传模板,并需要验证以确保正确上传 我对使用VBA的用户进行了列表数据验证,并向其发送了警告消息,但如果用户需要为其数据添加其他选项,则可能需要添加此列表。系统会提示用户告知他们输入的值不在列表中,并询问他们是否确定该值不在列表中 Excel默认警告弹出窗口的标准按钮为“是”和“否”。我希望在变量中捕获用户对此弹出窗口的响应,因此如果用户选择“是”,我希望突出显示单元格,以提示工作表收件人在上传工作表之前将此选项添加到系统中 我希望要求足够明确。我目前的验证V
Range(column & "12:" & column & "1000").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertWarning, Operator:= _
xlBetween, Formula1:= _
"=OFFSET(Options!$E$1,MATCH(" & column & "$3,Options!$C:$C,0)-1,0,COUNTIFS(Options!$C:$C," & column & "$3))"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = "Value not in List"
.InputMessage = Range(column & "11").Value
.ErrorMessage = "You have entered a value which is not in the list. Are you certain that the value you're looking for is not in the list?"
.ShowInput = True
.ShowError = True
End With