01/09/2009, 12:23
Puletin
VBA kod penceresini açınız yapıla işlemleri orada görebileceksiniz.
Mesela Nurullah Hoca nın örneğindeki Modeller alanının güncelleme sonrasına yazılan kod
Mesela Nurullah Hoca nın örneğindeki Modeller alanının güncelleme sonrasına yazılan kod
Kod:
Me.Fiyat = DLookup("[Fiyat]", "urun_tanimlama", "[Model]='" & Me.Modeller.Column(1) & "'" & " and " & "[Kategori]='" & Me.Kategori & "'")
Me.Renk = DLookup("[Renk]", "urun_tanimlama", "[Model]='" & Me.Modeller.Column(1) & "'" & " and " & "[Kategori]='" & Me.Kategori & "'")
Me.Kalınlık = DLookup("[Kalınlık]", "urun_tanimlama", "[Model]='" & Me.Modeller.Column(1) & "'" & " and " & "[Kategori]='" & Me.Kategori & "'")