Vba Excel-用户确认输入值并根据响应填充其他字段
我很惊讶我没能找到一个解决我认为是一个常见问题的办法 我正在单元格中输入文本值。如果用户条目与特定值匹配,我需要一个带有是/否问题的弹出窗口。如果用户按yes,我需要填充另一个呼叫。如果用户按“否”,则不执行任何操作Vba Excel-用户确认输入值并根据响应填充其他字段,vba,excel,popup,Vba,Excel,Popup,我很惊讶我没能找到一个解决我认为是一个常见问题的办法 我正在单元格中输入文本值。如果用户条目与特定值匹配,我需要一个带有是/否问题的弹出窗口。如果用户按yes,我需要填充另一个呼叫。如果用户按“否”,则不执行任何操作 我知道我们可以在宏中使用vbyesno来实现这一点,但由于某些原因,我没有正确地使用它。请提供帮助。此小工作表事件宏监视单元格B9的条目。如果用户输入shipping,则弹出窗口询问是否应输入shipping Cost。如果用户回答是,宏将100放入单元格C9中: Private
我知道我们可以在宏中使用vbyesno来实现这一点,但由于某些原因,我没有正确地使用它。请提供帮助。此小工作表事件宏监视单元格B9的条目。如果用户输入shipping,则弹出窗口询问是否应输入shipping Cost。如果用户回答是,宏将100放入单元格C9中:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "B9" Then
If Range("B9").Value = "shipping" Then
answer = Application.InputBox(prompt:="shipping costs required?", Type:=2)
If answer = "yes" Then
Application.EnableEvents = False
Range("C9").Value = 100
Application.EnableEvents = True
End If
End If
End If
End Sub
这只是一个演示,您可以根据自己的需要进行调整。非常感谢。虽然我需要MsgBox而不是InputBox,但在InputBox中,我根据该单元格中的条目填充了其他一些单元格中的预定义值。我也在整个专栏中应用了更改。但你的回答是我做对的起点。再次感谢!