variable - userform vba excel

Formulario de acceso abierto con filtro VBA

Question

Tengo problemas para abrir un formulario con un filtro. El código que estoy tratando de ejecutar es este:

DoCmd.OpenForm "MyForm", , "[ID] = " & Me.MyListBox.Column(0), , acFormEdit, acDialog

Cuando ejecuto esta línea, abre el formulario, pero no aplica el filtro.

La propiedad FilterOnLoad está establecida en True y he verificado que es verdadera en el evento On Load.

Mientras estaba en el evento Form_Load, Me.FilterOn = False y Me.Filter = "".

¿Qué pasó con el filtro? ¿Qué estoy haciendo mal? Intenté establecer la propiedad Me.FilterOn en True a través de VBA y luego guardar el formulario, pero cuando abro el formulario nuevamente, se restablece a False.

Si pongo el filtro usando VBA y luego establezco la propiedad Me.FilterOn en True, el formulario se filtra correctamente. He verificado que el valor correcto está ahí para "Me.MyListBox.Column (0)"

Answer 1

Esto es lo que el tema de ayuda del Método DoCmd.OpenForm tiene que decir sobre el parámetro FilterName :

Una expresión de cadena que es el nombre válido de una consulta en la base de datos actual.

Pero no le está dando el nombre de una consulta. Creo que realmente quiere el parámetro WhereCondition en su lugar:

DoCmd.OpenForm FormName:="MyForm", _
    WhereCondition:="[ID] = " & Me.MyListBox.Column(0), _
    DataMode:=acFormEdit, _
    WindowMode:=acDialog