ошибка при открытии файла

[kminas]

Во время тестирования программы, при открытии файла, состоящего из двух слов с пробелом программа выдает ошибку 4160 и сообщение: неправильное имя файла. Как можно обойти эту ошибку?

[Avsha]

типов файлов бывает много, впрочем как и способов открытия

[kminas]

типов файлов бывает много, впрочем как и способов открытия

файл *.doc

Открывается кодом:

Private Sub cmdOpen_Click()
Dim dlg As Object
Dim iFileName As String

On Error GoTo errr

Set oapp = CreateObject("Word.Application")
oapp.Visible = True
oapp.ChangeFileOpenDirectory "c:\Мои документы\Спецификации\"

Set dlg = oapp.Dialogs(80)
If dlg.Show = -1 Then
Documents.Open FileName:=dlg.Name
iFileName = dlg.Name
Documents(iFileName).Activate
Else
Set dlg = Nothing
Set oapp = Nothing
End
End If

frmOpen.Hide
frmShtamp.Hide
frmObor.Show

With ActiveDocument.Tables
If .Count > 0 Then
With .Item(.Count)
.Cell(.Rows.Count, 1).Select
End With
End If
End With

Exit Sub

errr:
n = Err.Number
MsgBox Err.Number
If n = 4248 Then
MsgBox "Вы ошиблись " & Chr(13) & "поставьте ПОЖАЛУЙСТА, курсор" & Chr(13) & " в левую НИЖНЮЮ" & Chr(13) & " ячейку таблицы!" _
, Title:="Информирует ЗаСПав:", _
Buttons:=vbExclamation
Resume Next
End If
If n = 4348 Then
MsgBox ("Вы ошиблись ")
End If
End Sub