[neo21]

Delirium, как открыть файл info.xlsx без за давания его полного пути в этом примере:

Код:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim objXL, objWorkbook  ' Объявляем переменные

        ' Открытие файла
        objXL = CreateObject("Excel.Application")
        objXL.Visible = True

        objWorkbook = objXL.Workbooks.Open("C:\Users\kl27\Desktop\Проэкт\WindowsApplication1\WindowsApplication1\bin\Debug\info.xlsx")

End Sub
End Class