Thread: UPDATE Query
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
fi.or.jp.de fi.or.jp.de is offline
external usenet poster
 
Posts: 93
Default UPDATE Query

Hi All,

I am using UPDATE query from Excel to Access.

I have 1000 rows with unique IDS ( same IDS in Access Database Table)

I need to UPDATE for 1000 IDS status. Right now I am using like this.

I want to know is there any better option to do this ??

For R = 4 To 1000

ID = Trim(Cells(R, "A").Value)
STS = Trim(Cells(R, "F").Value)

SQL = "UPDATE TRACKER SET TRACKER.STATUS = '" & STS & "'"
SQL = SQL & " WHERE ID = '" & ID & "'"

rs.Open SQL, db, adOpenDynamic, adLockOptimistic, adCmdText

Next R