Oğuz bey aşağıdaki kodları dener misiniz?
"F_02_TeklifDetayAltForm" formundaki "Marka" metin kutusunun odaklanma olayına

Private Sub Marka_GotFocus()

If IsNull(Me.Marka) And Nz(DCount("*", "T_02_TeklifDetay", "TeklifVerilenFirma='" & Me.TeklifVerilenFirma & "'")) <> 0 Then

Me.Marka = DLast("marka", "T_02_teklifdetay", "Teklifverilenfirma='" & Me.TeklifVerilenFirma & "'")

End If

End Sub

"F_02_TeklifDetayAltForm" formundaki "DovizCinsi" metin kutusunun odaklanma olayına

Private Sub DovizCinsi_GotFocus()

If IsNull(Me.DovizCinsi) And Nz(DCount("*", "T_02_TeklifDetay", "TeklifVerilenFirma='" & Me.TeklifVerilenFirma & "'")) <> 0 Then

Me.DovizCinsi = DLast("DovizCinsi", "T_02_teklifdetay", "Teklifverilenfirma='" & Me.TeklifVerilenFirma & "'")

End If

End Sub