Объект присоединенная рамка

[Kot070]

Добрый день, помогите поправить.
На форме есть присоединенная рамка в которую попадает из запроса поле объекта Ole, файл открывается но есть нюанс.
Если проходить код самому пошагово то файл открывается в отдельном окне Excel, если в автоматическом режиме то почему файл открывается в присоединенной рамке, как сделать чтобы всегда файл открывался в отдельном окне Excel?

Private Sub File_Click()

'Nomdoc = Val(Me.link.Value)
Nomdoc = 3
PrintDoc Nomdoc

End Sub

Public Sub PrintDoc(n)

Nomdoc = n
Select Case n
 
 Case 3: OrderInput3

 End Select
End Sub

Public Sub StartWordEasy(FieldName As String)
    
       Forms!САУ![shabl] = DLookup("File", "Files", "Код=" & Nomdoc)
       Forms!САУ![shabl].Action = acOLEActivate

    Set obExcel = GetObject(, "Excel.Application")
        
 End Sub

Public Sub OrderInput3()

StartWordEasy "Shabl"

End Sub