我是VBA noob,但也许你可以提供帮助:
我想在我的主表单" FinalForm"上刷新所有表单(子表单)和查询。但是我使用Access作为SQL Server的前端。显然,通常的按钮(使用向导创建,如refreh,新记录等)不会起作用。
我通过关闭并重新打开表单创建了一个(愚蠢的)解决方法:
Private Sub Befehl71_Click()
DoCmd.Close acForm, "FinalForm"
DoCmd.OpenForm FormName:="FinalForm"
End Sub
这在vba编辑器中工作正常,但如果按钮触发则会失败(关于ole通信错误)。
我该如何解决这个问题?
答案 0 :(得分:1)
标准的VBA程序是
Me.Requery
仅适用于子表单
Me.PUT_SUBFORM_NAME_HERE.Form.Requery