Mariana, habría que ver qué sistema estás usando para cargar un producto, puede ser al teclear su código de producto, al seleccionar un producto de un combo, etc. No se como andarás de VBA pero te indico un sistema fácil usando la librería de DAO para traerte a tu formulario la descripcion y el precio desde la Tabla Productos, al teclear su código:
Evento "Después de actualizar" el campo CodProducto en el formulario:
Private Sub CodProducto_AfterUpdate()
Dim TablaProd As DAO.Recordset
Set TablaProd = CurrentDb.OpenRecordset("TuTablaProductos")
TablaProd.FindFirst "CodPro='" & CodProducto & "'"
If Not TablaProd.NoMatch Then
Producto = TablaProd!Descripcion 'Carga el nombre del producto desde la tabla
Precio = TablaProd!Precio 'Carga el precio del producto desde la tabla
Cantidad.SetFocus 'Envia el Foco al siguiente campo, normalmente a Cantidad
TablaProd.Close: Set TablaProd = Nothing
End Sub
CodPro = Nombre de codigo producto en la Tabla
CodProducto = Nombre de codigo producto en el Formulario
Si tu codigo producto fuera Numérico, cambia la línea del FindFirst por esta:
TablaProd.FindFirst "CodPro=" & CodProducto
Un saludo
Enrique