1- Bu şekilde seçenek grupları oluşturduğunuzda if...then değil select case kullanmanızı şiddetle öneririm. Çok daha pratiktir. Çok seçenek olunca kolaylık sağlar. Kullandığınız kodları bu şekle getirirseniz daha stabil kodlarınız olur.
2- Açılan kutudan veri alan bir sorgunuz ve ondan da beslenen bir raporunuz varsa, rapor açılırken ya da yazılırken açılan kutudaki değeri silemezsiniz. O yüzden her rapor açma eylemi öncesindeki Me.acrapor = "" şeklindeki kodunuzu kaldırıp, işlem sonunda açılan kutudan veri seçmek istediğinizde bu eylemi kullandım. Böylece sorununuz halledilmiş oldu.

Örnekteki yapıyı inceleyip sizin gönderdiğinizle farkını karşılaştırıp yöntemi kavramaya çalışın. kolay gelsin.