Não consigo resolver esse erro de sintax a mensagem diz que falta um operando em CodigoProduto =
CurrentDb.Execute "UPDATE tblProduto SET quantidade = Nz(quantidade,0)-Nz(quantidade,0) WHERE CodigoProduto = " & Me.CodigoProduto & ""
CurrentDb.Execute "UPDATE tblProduto SET quantidade = Nz(quantidade,0)-Nz(quantidade,0) WHERE CodigoProduto = " & Me.CodigoProduto & ""