ComboBox Code

[SEYKOK]

Private Sub Customer_Code_BeforeUpdate(Cancel As Integer)
Me![Description] = Me![Customer Code].Column(2)
End Sub

Arkadaşlar yukarıdaki kod ile Orders TARIK KARABAY formunda alt formda Customer code seçtiğimde Description otomatik alıyor. Bu oluyor ama bir türlü Unit Price kısmını da otomatik aldırmayı başaramadım.

Me![Unit_Price] = Me![Customer Code].Column(3)

şeklinde bir kodla devam etmem gerekiyor. Fakat iki komut arasındaki bağlaç mı omuyor nedir olmadı.

Yardımcı olursanız memnun olurum

 

[SEYKOK]

Arkadaşlar ben hatamı buldum isteyen arkadaşlar için

Private Sub Customer_Code_BeforeUpdate(Cancel As Integer)
[Description] = Me![Customer Code].Column(2)
[Unit_Price] = Me![Customer Code].Column(3)
[Item_Code] = Me![Customer Code].Column(1)
End Sub

Me![Description] değil [Description] ile başlamalıymışım

 

[SEYKOK]

Problem çözülmüş halde tablo ektedir