Well you have "AcApp.Quit" just after that, which closes the application - and therefore the report too.

You may want some kind of pause in there, I guess a msgbox or similar.