Como puedo actualizar datos en un registro de otra tabla?

[Skakeo]

Puedes probar con
Dim strSQL as string
strSQL = "UPDATE Productos SET UltimaFecha = #" & me.fecha & "#, UltimoPrecio =" & me.precio & "WHERE CodigoProducto =" & me.codigo
docmd.setwarnings (False)
docmd.runsql strsql
docmd.setwarnings (true)
si el precio es un double te dara problemas entonces pega esta funcion que te paso en un modulo de la base de datos y pones la instruccion asi:
Public Function ChSep(Value As Double)
'************************************************* **************
' Al crear el SQL
' sql = "Select * From Tabla Where Campo =" & ChSep(Valor)
'************************************************* **************
Dim I As Long
Value = CStr(Value)
For I = 1 To Len(Value)
If Mid(Value, I, 1) = "," Then
ChSep = ChSep & "."
Else
ChSep = ChSep & Mid(Value, I, 1)
End If
Next I
End Function
el codigo queda ahora asi
Dim strSQL as string
strSQL = "UPDATE Productos SET UltimaFecha = #" & me.fecha & "#, UltimoPrecio =" & chsep(me.precio) & "WHERE CodigoProducto =" & me.codigo
docmd.setwarnings (False)
docmd.runsql strsql
docmd.setwarnings (true)
suponiendo que codigo producto es un numero
Un saludo
Skakeo®