[Resolvido]Penultimo Registro

Caros internautas, exclui um tópico e estou criando outro para ser mais transparente na minha dúvida.
Tenho uma tabela de vendas onde aparece a compra dos clientes que compraram no crediário, gostaria que na minha consulta,
eu pegasse um único registro de um cliente como a data da penultima parcela.

Grato pela ajuda!

Amigo veja estas funções


Para obter um valor de um campo no registro anterior, na Propriedade ControlSource (Origem do Controle) da caixa de texto, digite:

=DLookUp("[Nome_Campo]","Nome_Tabela","[Id_Campo]=Forms![Nome_Formulario]![Id_Campo]-1")

b) Para obter um valor de um campo no próximo registro, na Propriedade ControlSource (Origem do Controle) da caixa de texto, digite:

=DLookUp("[Nome_Campo]","Nome_Tabela","[Id_Campo]=Forms![Nome_Formulario]![Id_Campo]+1")

2) Em um relatório:

Para obter um valor de um campo no registro anterior, na Propriedade ControlSource (Origem do Controle) da caixa de texto, digite:

=DLookUp("[Nome_Campo]","Nome_Tabela","[Id_Campo]=Reports![Nome_Relatorio]![Id_Campo]-1")

b) Para obter um valor de um campo no próximo registro, na Propriedade ControlSource (Origem do Controle) da caixa de texto, digite:

=DLookUp("[Nome_Campo]","Nome_Tabela","[Id_Campo]=Reports![Nome_Relatorio]![Id_Campo]+1")

Em uma consulta:

a) Para obter um valor de um campo no registro anterior, numa coluna vazio na linha de grade a consulta, digite:

Registro_Anterior: DLookUp("[Nome_Campo]","Nome_Tabela","[Id_Campo]=" & [Id_Campo]-1)

b) Para obter um valor de um campo no próximo registro, , numa coluna vazio na linha de grade a consulta, digite:

Proximo_Registro: DLookUp("[Nome_Campo]","Nome_Tabela","[Id_Campo]=" & [Id_Campo]+1)

Amigo, em primeiro lugar quero agradecer pela atenção!
Eu fiz na consulta usando o seguinte comando: =DPesquisa("[ft16demi]";"[ftrec01_dbf]";"[cod_cli]=Forms![Renegociados]![cod_cli]-1")
Porém, tem como vc informar como fazer em VBA quando usar uma caixa de combincação?
Obrigado!

Por favor seja mais explícito pois não entendi. O que quer fazer. presumo que com uma caixa de combinação?

Duas tabelas: ftdup01 e ftrec01
ftdup01 - tabela a receber (vendas a crediário)
ftrec01 - tabela recebidos

Criei uma consulta usando a tabela ftrec01 com alguns critérios como:
ft16nomef - cliente
ft16dpag - [entre 16/08/2010 e Data()] - data do pagamento
ft16vorg - Valor
ft16emi - Data da emissão

Na minha tabela ftrec01, aparece as prestações em atraso,data da emissão e a data da renegociação, como exemplo abaixo:


No meu formulário abaixo:

Você observa que a Data de emissão é igual a data da renegociação e o que eu quero, é buscar a data antiga.

Obrigado!

Então é assim:

De um exemplo que coloquei aqui no site à poucos dias para um colega acrescentei 2 campos data na tabela.

1- Veja a consulta como está estruturada para a data

2- veja o Form para seleccionar todo o tipo de datas que pretende, através de calendários ou de botões e por último clique no botão para visualizar relatório filtrado.

Adapte às suas necessidades. Bom trabalho!

http://dl.dropbox.com/u/8157744/egitopvh.mdb

Fico grato pela atenção, porém, verificando a tabela, os registros estão na mesma linha.



Ou seja, o campo DataInicial: 01/08/2010 para mim é a Data da compra do Cliente
Este campo que me interessa.

Obrigado!

Caro amigo

Adapte às suas necessidades. O facto é que os registos tanto podem estar na mesma linha como em linhas diferentes???, bom você deve estudar o exemplo que lhe enviei e perceber o que foi feito para chegar a isso. No campo DataCompra do cliente cole o código que está na datainicial e experimente os parâmetros que a consulta vai pedir.

1- Coloque o código que está na datainicial na consulta para o campo que lhe interessa na sua consulta

2- Defina a origem dos registos no formulário para o nome da sua consulta

3- Abra o formulário no código VBA e Altere o nome que lá está da consulta para a sua consulta. No botão para visualizar o relatório substituir pelo nome do seu relatório

4- Copie as caixas de datainicial e final para o cabeçalho do seu relatório

Está simples e claro. Manipule o exemplo que lhe enviei, veja como funciona e tenho a certeza que você vai dar conta do recado.