[Resolvido]Alterar valores de varios registros de uma determinada coluna da tabela

Olá senhores ,
Venho pedir ajuda mais uma vez em relação a uma atualização de dados de certos registros, vejam tenho um formulário onde abre uma quantidade de registros de uma certa tabela , quero apenas mudar a data desse registro de uma vez só tenho um campo com a nova data e quero que essa nova data substitua tros os registros que est~çao selecionados nessa tabela por um seletor sim/não quando seletado ele substituisse todas as datas de uma vez só
desde já agradeço a colaboração

Olá jorge,

Em sua sub-rotina faltam diversos dados:

- tnl_contas_receber (tabela?)
- Me.txt_QtdParccelas (?)
- Rs("DataVencimento") = DateAdd(Me.NovaData) (Onde estão os parâmetros da função DateAdd?)
- For I = 1 To Me.DataVencimento 'Insere as parcelas na tnl_contas_receber (tipos incompatíveis de extensão do looping FOR)

Bom dia,

Os registros estão numa Listbox? Não posso baixar o arquivo.
Se sim, ai vai.

Código:

Dim i As Long
'Começa Loop na Listbox
For i = 0 To Me.SuaListbox.ListCount - 1
    'Verifica os selecionados
    If Me.SuaListbox.Selected(i) = True Then
          'Se tiver selecionado, então atualiza a data na tabela
           CurrentDb.Execute "UPDATA SuaTabela SET CampoDataTabela='" & SuaCaixaTextoComDataNova & "' WHERE IdNaTabela=" & IdNaListbox.Column(0,i) & ""
    End if
Next i

Primeiramente Obrigado pelas resposta , em relação ao good guy, eu só postei um pedaço do que eu preciso fazer veja que isso faz parte de um gigantesco projeto , apenas quero solucionar essa duvida o finenceiro apenas precisa empurrar essas datas de vencimentos e não temos parcelas e nada assim apenas pagar ou adiar pagamento mandando para frente o vencimento e quanto a data original játenho outro campo da tabela reservado a ela ao qual não se mexe, desde já obrigado pela atenção vou estudar seu codigo.

Quero te dizer que aquele codigo não pertence aquela rotina apenas inseri lá para arruma-lo e acabei não apagando na hora de postar desculpe a confusão

Referente ao CaioSouza , agradeço sua atenção , que pena que não pode baixar , pois eu tenho a opção de listBox porém não sei muito mexer com elas ainda sou novo em VBA e access, apenas 2 anos mexendo e não domino por completo , mas eles estão e subformulário que são filtrado por outro formulario de seleção as selecionadas vem para esse formulário onde no subformulario são apresentadas pela seleção do anterior onde quero mudar as datas de vencimentos desses titulos mas como são muito gostaria de colocar a data novea emn uma caixa de texte do tipo data e que todos os titulos ali selecionados assumissem aquela data de vencimento

obrigado vou analizar seu codigo

Opa, boa tarde

Não podia baixar por conta de estar no trabalho, segue anexo.
Veja se atende a sua necessidade.


Dicas:
1 - Em vez de criar um campo de "Selecionar" na sua tabela, vc pode fazer isso através de ListBox'es
2 - Nomenclatura de campos em tabelas, nunca utilize espaços e muito menos acentos.

Bons estudos.

Senssacional , obrigfado de verdade era isso mesmo que eu precisava , dou o assunto por resolvido.

Valeu a todos que se empenharam. obrigado Resolvido!!

O fórum agradece, bons estudos