DoCmd.SetWarnings False
DoCmd.RunSQL "insert into tbl_duyuru (duyurumetni) values ('" & Me.yazım_alanı & "')"
DoCmd.SetWarnings True
butonun tıklandığında olayındaki kodu aşağıdaki ile değiştirerek deneyiniz.