[Resolvido]Alterar campo de vários registros em formulário contínuo

Olá pessoal,
possuo a "Tabela1" com vários campos e um destes possui o nome de "Selecionado". O campo "Selecionado" possui o valor de Sim/Não e é apresentado em forma de Caixa de Seleção no formulário contínuo de nome "Form1". Este campo "Selecionado" existe apenas para selecionar os registros que pretendo incluir em um relatório.
Vamos ao problema: no rodapé do formulário contínuo inseri dois botões de nome "SelecionarTodos" e "LimparSeleção", com a finalidade de atribuir o valor Sim/Não ao campo "Selecionado" em todos os registros filtrados no formulário, porém não encontrei nenhuma função que desempenhe esta tarefa.

Boa noite Tiago.

Seja bem vindo ao fórum.

Os exemplos abaixo servem para todos os registros da tabela:

Para marcar com NÃO:

   Dim strSql As String
   Dim Banco As DAO.Database
   Set Banco = CurrentDb
   
   
   strSql = "UPDATE Tabela1 SET Tabela1.Selecionado = No;"

   Banco.Execute strSql

Para marcar como SIM, altere somente a seguinte linha:

   strSql = "UPDATE Tabela1 SET Tabela1.Selecionado = Yes;"


Se você usar algum filtro no seu formulário contínuo, precisará passar os critérios para a expressão sql.


Nivaldo.

Funcionou!
Estou utilizando apenas o "Selecionado" = Não.
Obrigado pela atenção.

Obrigado pelo retorno Tiago.


O forum agradece.


Nvaldo.