Başta ozanakkaya olmak üzere hocalarıma soruyorum program çok güzel olmuş, programda malzeme aktar butonuna basınca çok güzel çalışıyor, açılan ve malzeme tablosuna KDV ekledim, malzeme aktardaki formülü
Private Sub Komut9_Click()
DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO 3MALZEME ( TÜRÜ, MİKTAR, 3MALZEME, KDV, MNO, yemek ) SELECT ACILAN.TÜRÜ, ACILAN.MİKTARI, ACILAN.MALZEME, ACILAN.KDV, Val([Formlar]![1GENEL]![2YEMEK].[Form]![YNO]) AS İfade1, ACILAN.YEMEK FROM ACILAN WHERE (((ACILAN.YEMEK)=[Formlar]![1GENEL]![2YEMEK].[Form]![YEMEK]));"
DoCmd.SetWarnings True
Me.[3MALZEME].Requery
End Sub
şelinde düzenledim, ancak ifade1 nerde onu bulamadım. şimdi programa ekleme yapamıyorum. neyi nerde eksik yaptım yardımcı olursanız sevinirim.
