Обратиться к текущей книге excel из Visual Basic-приложения

[ольгаг]

Здравствуйте Уважаемые программисты!
Подскажите пожалуйста, как обратиться к ячейке "A1" текущей книги excel из запущенного из этой же книги приложения exe.
Поясню: у меня есть приложение "forms.exe" (написано на Visual Basic 2010). В этом приложении есть Form1 с TextBox1. Из книги xls с листа "Лист1" (имя и путь книги меняется) по кнопке запускается мое приложение exe:
Sub проба()
Dim a
a = Shell("c:\forms.exe", 1)
End Sub
Подскажите пожалуйста как прописать в коде VB2010, чтобы при запуске Form1 в поле TextBox1 считывалось значение с Листа "Лист1" из ячейки "A1" книги xls, из которой и запущено данное приложение exe.
Заранее спасибо.

[Hugo121]

Я думаю может быть нужно как-то так:

Sub проба()
Dim a

a = Shell("c:\forms.exe " & ThisWorkbook.FullName, 1)
End Sub

Ну и соответственно изменить код forms.exe, чтоб принимал параметры.
Но я в VB не вникал, т.ч. сори...

[doober]

Для такого запуска ваше ехе родителя не имеет,если запущено несколько процессов Excel,вы не сможете однозначно подключиться к нужному.
Возможно имеет смысл прописать некоторве параметры для запуска приложения через командную строку,например полное имя книги.
Тогда Sql запросом можно получить необходимые данные.

Вариант.
Производите поиск в прощессах процесс Excel.
Пример здесь

Находите активную книгу,лист и с него берете данные.
Это не такая уж и простая задача для вас.

PS:Вашу конструкцию считаю извратом.
Проще тогда обмен через DDE организовать.

[ольгаг]

Спасибо за Ваши отклики!

[ольгаг]

Я попробовала код в excel:
Sub проба()
Dim a
a = Shell("c:\forms.exe " & ThisWorkbook.FullName, 1)
End Sub

при этом в коде forms.exe прописала так:
For Each arg As String In My.Application.CommandLineArgs
MsgBox(arg)
Next

в принципе работает. Но появляется несколько msgbox-ов с параметром (т.е. "MsgBox(arg)") , признаком деления которых является пробел в пути к файлу xls. Т.е. если путь c:\новая папка\1.xls - то появляется 1msgbox "c:\новая", затем 2msgbox "папка\1.xls".
Подскажите пожалуйста, что можно приписать чтобы в окно выводился сразу весь путь? Заранее спасибо.

[ольгаг]

Ответ найден.

[Hugo121]

Chr(34) добавляли?

[IgorGO]

два раза???

[ольгаг]

Получилось следующим образом:
Dim args As String = ""
For Each arg As String In My.Application.CommandLineArgs
args &= arg & " "
Next

[ольгаг]

Подскажите пожалуйста, как преобразовать string в excel-объект?
Заранее спасибо.