Hayırlı günler arkadaşlar. Bu gün 2 hatanın olduğunu fark ettim 
İlki: Private Sub Komut519_Click()
On Error GoTo Err_Kaydet_Click

If IsNull(Me.Teknik_Özellikleri) Then
MsgBox "Lütfen Teknik Özellikleri Belirtiniz", 48, "Kayıt İşlemi"
Me.Teknik_Özellikleri.SetFocus
Exit Sub

End If

If IsNull(Me.Miktar) Then
MsgBox "Lütfen Miktar Belirtiniz", 48, "Kayıt İşlemi"
Me.Miktar.SetFocus
Exit Sub

End If

    DoCmd.RunCommand acCmdRefresh
    If MsgBox("Değişiklikler kaydediliyor!", 36, "Kayıt İşlemi") = 6 Then
    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
    
       
End If
satinalma_durumu = 7
MsgBox "Siparişiniz Satınalma Birimine Yönlendirildi"

Exit_Kaydet_Click:
    Exit Sub

Err_Kaydet_Click:
    MsgBox Err.Description
    Resume Exit_Kaydet_Click
    

End Sub

Diye bir butonun altındaki kodun çalışma düzeninde bir terlik var. Msgbox a hayır desem de çalışmaya devam ediyor. En azından "satinalma_durumu = 7" faailyetlerini yapmaması gerekiyor. 

Diğer en önemli husus ise Kodun başında görüldüğü üzere alanlar boş ise alan doldurma hatası veriyor bu normal istenen bir komut.
Anormal olan ise ben başka bir tuş ile o alanları temizliyorum. Alanlarda hiç veri olmamasına rağmen dolu gibi davranıyor. kayıt işlemini yapıyor tabi boş olarak. Yardımlarınız için şimdiden teşekkürler.