Excel programında olayları bir süreliğine iptal etmek istediğimizde Application.EnableEvents = False böyle bir kod yazıyorduk. Bu kod Accves'te nasıl çalışıyor.

DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdCopy
DoCmd.GoToRecord , , acNewRec
DoCmd.RunCommand acCmdSelectRecord
'Application.EnableEvents = False
DoCmd.RunCommand acCmdPaste
'Application.EnableEvents = True
Me.IslemTuru = "Giriş"

bu kod çalışınca Açılan kutulardan birindeki bir olay tetikleniyor. Bu olayın tetiklenmesini bir süre pasif etmek için ne yapmalıyım teşekkürler.

Sadece ilgili yere


yazmanız yeterlidir

DoEvents parametre olarak bir şey istemedi yani olayların işlemesini kapatmam sonra açmam lazım bu nasıl olacak analamdım.
Kodu şöylece denedim olaylar hala aktif

DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdCopy
DoCmd.GoToRecord , , acNewRec
DoCmd.RunCommand acCmdSelectRecord
DoEvents
DoCmd.RunCommand acCmdPaste
DoEvents
Me.IslemTuru = "Giriş"

Sayın trek6700
bekleme süresini şu şekilde ayarlayabilirsiniz,



şu komut


3 saniye bekledikten sonra çalışır, süreyi next ifadesindeki değeri değiştirerek ayarlayabilirsiniz.

Teşekkürler. Ancak sorunum çözülmedi.

O zaman bir de şöyle sorayım. VBA Events (olayları) pasif olacak.
Mesela excelde şöyle : Application.EnableEvents = False

Sizin yazdığınız döngüde ise sadece bekleme işlemi yapılıyor olaylar pasif olmuyor. Kod satırı yapıştırma işlemi şu anda kullanılamaz diye bir hata veiyor. Sanki döngü sayısınca yapıştırma işlemine devam edecekmiş geldi bana.

Merhaba..

Siz ne amaçla bu yapıyı kullanıyorunuz? Yeni kayıtta varsayılan değer getirmek için Dlast fonksiyonundan yararlanabilirsiniz gibi geliyor bana..