I believe that I found a solution to my problem. All that was needed was the following two lines of code:

CATIA.StartCommand("Options...")
CATIA.ActiveWindow.Close

Now everything works. Thanks.