thank you royVidar, now i am getting hung up with the code here is the module i think i need to adjust the code to work with sql like the above problem, any help would be greatly apreciated:
Sub Updatetable()
Dim CurrentDB As Database
Dim ExcelFile As Excel.Workbook
Dim TABLENAMEHERE As Recordset
Dim i As Integer
Set EXCELFILE = GetObject("FILEPATH.xlsx")
Set CurrentDB = DBEngine.Workspaces(0).Databases(0)
Set TABLENAMEHERE = CurrentDB.OpenRecordset("TABLENAMEHERE", , dbSeeChanges)
TABLENAMEHERE.Index = "INDEXEDFIELDNAMEHERE"
For i = 2 To 96
TABLENAMEHERE.Seek "=", EXCELFILE.Sheets(1).Cells(i, 1)
If TABLENAMEHERE.NoMatch Then
MsgBox EXCELFILE.Sheets(1).Cells(i, 1) & " " & EXCELFILE.Sheets(1).Cells(i, 2) & " " & i
Else
TABLENAMEHERE.Edit
TABLENAMEHERE("UPDATEDFIELD") = EXCELFILE.Sheets(1).Cells(i, 13)
TABLENAMEHERE.Update
End If
Next
So far TABLENAMEHERE.Index = "INDEXEDFIELDNAMEHERE" is not working, giving the error message 'operation is not supported for this data type'
Please help this will help me out greatly!!!