DoCmd.OpenReport "rSonMuayene", acViewPreview
satırının hemen altında olabilir gibime geliyoristerseniz çalışmanızın ilgili kısmını ekleyin oradan deneyelim
Not: elimde uygun VT olmadığından uygulamalı deneyemiyorum
eklerseniz en azında araştırma-deneme -yanılma yöntemiyle çözmeye çalışırız