Развернуть свернутое окно Excel (открытое через OLE) - VBA

Формулировка задачи:

Открываю извне файл Excel через OLE:

XlApp.Workbooks.Open(FileName);
XlWrkBk := XlApp.ActiveWorkbook;
 
XlApp.Visible(TRUE);
XlApp.UserControl(TRUE);

Окно Excel появляется, все здорово. Но оно свернутое, а активным остается окно текущей программы. Далее я еще вызываю макрос:

XlApp.RUN('<macros name>');

И там интерактив с пользователем, хотелось бы чтобы оно сразу возникало перед глазами, т.к. можно не заметить где-то там свернутый Excel. Можно прям в Макросе написать код на VBA, чтобы развернуть Excel. Перепробовал разный код, но Excel не дается.

IF XlApp.WindowState = WindowState[1] THEN //minimized
  XlApp.WindowState(WindowState[2]); //normal
 
XlApp.WindowState(WindowState[3]); //maximized
XlApp.ShowWindowsInTaskbar(TRUE);
XlApp.Visible(TRUE);
XlApp.ActiveWindow.Activate;

Решение задачи: «Развернуть свернутое окно Excel (открытое через OLE)»

textual
                            Листинг программы 
                        
                            XlApp.Windows(1).WindowState(xlMaximized)