Update ACCESS 2010 table field based on value in another field with VBA
I have a table with a field DealDateContract. There are two additional fields in the table that need to be updated with information based on the date in this field, but I can't get the below to work. Am not sure if there is a QUATER function in ACCESS 2010.
Public Sub YearQuarterSort()
'UPdates quarter and quarter sort columns in tblReportSource table
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("tblReportSource")
Do While Not rst.EOF