"TBL_HAMMADDE_MIKTAR" yazılmış, doğrusu "TBL_HAMMADDE.MIKTAR" olmalı. Yani kod aşağıdaki gibi olmalı
Private Sub Komut31_Click()
DoCmd.RunSQL "INSERT INTO TBL_MALIYET ( MAL_URUN_KODU, MAL_URUN_ADI, MAL_URUN_BIRIMI, MAL_URUN_FIYATI, MAL_URUN_DV, MAL_URUN_MIKTARI, MAL_URUN_ACIKLAMA ) SELECT TBL_URUNLER.URUN_KODU, TBL_URUNLER.URUN_ADI, TBL_HAMMADDE.HBIRIMI, TBL_URUNLER.URUN_FIYATI, TBL_HAMMADDE.H_DOVIZ, TBL_HAMMADDE_MIKTAR, TBL_URUNLER.URUN_ACIKLAMA FROM TBL_HAMMADDE INNER JOIN TBL_URUNLER ON TBL_HAMMADDE.HURUNKODU = TBL_URUNLER.URUN_KODU WHERE (((TBL_URUNLER.URUN_KODU)=[Formlar]![FORM_MALIYET]![URUN_KODU]) AND ((TBL_URUNLER.URUN_ID)=[Formlar]![FORM_MALIYET]![URUN_ID]));"
End Sub
