Condicion para actualizar solo campos vacios

Consulto a ustedes para que me puedan ayudar a resolver un problema que se que para ustedes no lo es.

Tengo un formulario que contiene un subformulario, el formulario tiene un campo llamado IdCotizacion que lo usaré para identificar los artículos ingresados en el subFormulario para su posterior filtrado. IdCotizacion es autonumerico que viene dado por una tabla distinta a la del subFormulario pero que al presionar el btnGuardar este agregará el mismo número de IdCotizacion a cada artículo del subformulario como mencioné antes.

Adapté un código vba encontrado para que me hiciera trabajo el de actualizar todos los datos del campo IdCotizacion del subFormulario (Estos se guardan en la consulta CotRegistrosCns) para definir cuales campos van ligados a una serie de artículos.

Mi problema es que al crear un nuevo registro requiero añadir una condición que sólo al presionar el botón btnGuardar me actualice los campos que están siendo cotizados con el nuevo valor de NCotizacion y no de todos.

Como puedo hacerlo en el siguiente código:

' Declaramos las variables
    Dim rst As dao.Recordset
'   Creamos el recordset
    Set rst = CurrentDb.OpenRecordset("CotRegistroCns")
'   Nos movemos al primer registro
        rst.MoveFirst
'   Iniciamos el recorrido de registros
        Do Until rst.EOF
'   Cambia número de cotizacion
            rst.Edit
            rst.Fields![NCotizacion].Value = NCotizacion
            rst.Update
        rst.MoveNext
        Loop

Añade tu respuesta

Haz clic para o