Change column data case : Recordset Find « Access « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Access
  3. Recordset Find

Change column data case

 

Sub exaRecordsetEdit()

    Dim db As Database
    Dim rs As Recordset
    
    Set db = CurrentDb
    Set rs = db.OpenRecordset("Employees")
    
    rs.MoveFirst
    Do While Not rs.EOF
       rs.Edit
       rs!Title = UCase$(rs!Title)
       rs.Update
       rs.MoveNext
    Loop
    
    rs.Close
    
End Sub








Related examples in the same category

1.Finding the Record Position
2.Simple Select statement
3.SQL with where clause
4.Select specific column in select statement
5.Finding Records Using the Find Method
6.Finding a Record Based on Multiple Criteria
7.Finding a Specific Record in a Recordset
8.Find record by using Recordset.FindFirst
9.NoMatch property in Recordset