我制作了一个Excel宏，它使用求解器给出结果。生成结果后，它会显示一个对话框来接受结果。由于我在宏中有50个求解器结果，我必须单击50次“确定”。VBA中是否有一些调整可以自动单击“确定”或按Enter键？
f0brbegy1#
有一个更简单的方法.在你的代码中键入这个：“solversolve（true）”如果为True，则求解程序返回结果，而不显示“求解结果”对话框
cl25kdpy2#
SendKeys“~”帮我完成了这个工作。在solversolve命令之后输入这个代码，回车会自动输入，按下OK并关闭对话框。
8ulbf1ek3#
在vba中有一个SendKeys命令，它允许你模拟击键。
cig3rfwq4#
不确定，但尝试Application.DisplayAlerts也就是说，修改宏：
Application.DisplayAlerts
Application.DisplayAlerts = False 'turns off dialog prompts your_macro_code_here Application.DisplayAlerts = True 'turns back on dialog prompts for normal usage
4条答案
按热度按时间f0brbegy1#
有一个更简单的方法.在你的代码中键入这个：“solversolve（true）”如果为True，则求解程序返回结果，而不显示“求解结果”对话框
cl25kdpy2#
SendKeys“~”帮我完成了这个工作。在solversolve命令之后输入这个代码，回车会自动输入，按下OK并关闭对话框。
8ulbf1ek3#
在vba中有一个SendKeys命令，它允许你模拟击键。
cig3rfwq4#
不确定，但尝试
Application.DisplayAlerts也就是说，修改宏：