Modificar um registro existente em um Conjunto de Registros de DAO

Você pode modificar registros existentes em um objeto Recordset do tipo tabela ou tipo dynaset usando os métodos Edit e Update.

Para modificar um registro existente em um objeto Recordset do tipo tabela ou tipo dynaset:

1. Vá até o registro que você deseja alterar.

2. Use o método Edit para preparar o registro atual para edição.

3. Faça as alterações necessárias no registro.

4. Use o método Update para salvar as alterações no registro atual.

O exemplo de código a seguir mostra como alterar os cargos de todos os representantes de vendas em uma tabela chamada Employees.

Dim dbsNorthwind As DAO.Database 
Dim rstEmployees As DAO.Recordset 
 
   Set dbsNorthwind = CurrentDb 
   Set rstEmployees = dbsNorthwind.OpenRecordset("Employees") 
 
   rstEmployees.MoveFirst 
   Do Until rstEmployees.EOF 
      If rstEmployees!Title = "Sales Representative" Then 
         rstEmployees.Edit 
         rstEmployees!Title = "Account Executive" 
         rstEmployees.Update 
      End If 
      rstEmployees.MoveNext 
   Loop 

Observação

Se você não usar o método Editar antes de tentar alterar um valor no registro atual, ocorrerá um erro em tempo de execução. Se você editar o registro atual e depois ir para outro registro ou fechar o objeto Recordset sem antes usar o método Update, suas alterações serão perdidas sem aviso. Por exemplo, a omissão do método Update dos resultados do exemplo anterior faz com que nenhuma alteração seja feita na tabela Employees.

Você também pode encerrar o método Edit e todas as transações pendentes sem salvar as alterações pendentes usando o método CancelUpdate. Embora seja possível encerrar o método Edit apenas retirando o registro atual, isso não é prático quando o registro atual é o primeiro ou último registro no Recordset ou quando se trata de um novo registro. Geralmente, é mais simples usar o método CancelUpdate .

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.