Можно ли и как Передать ссылку на объект от одного VB или VBA приложения другому ?
Формулировка задачи:
Можно ли и как
Передать ссылку на объект от одного VB или VBA приложения другому ?
Например, есть VB приложение My1.exe и XLS файл X.xls ,
хочу при выполнении My1.exe передать объект MyObject (созданый здесь же в My1.exe ) в Public переменную Public P as Object , находящуюся в одном из модулей X.xls ( ну или в другой какой контейнер вместо P переменной, - не знаю какой).
После чего запустить X.xls (ну это не проблема), чтобы он работал уже с только что установленым значением P .
PS.
( Ну или вместо X.xls может выступать другое Vb приложение My2.exe )
Передать ссылку на объект от одного VB или VBA приложения другому ?
Например, есть VB приложение My1.exe и XLS файл X.xls ,
хочу при выполнении My1.exe передать объект MyObject (созданый здесь же в My1.exe ) в Public переменную Public P as Object , находящуюся в одном из модулей X.xls ( ну или в другой какой контейнер вместо P переменной, - не знаю какой).
После чего запустить X.xls (ну это не проблема), чтобы он работал уже с только что установленым значением P .
PS.
( Ну или вместо X.xls может выступать другое Vb приложение My2.exe )
Решение задачи: «Можно ли и как Передать ссылку на объект от одного VB или VBA приложения другому ?»
textual
Листинг программы
<font color="blue">Public</font> <font color="blue">Sub</font> AdpSetCnn() <font color="blue">Dim</font> Rec <font color="blue">As</font> ADODB.RecordSet Rec=<font color="blue">New</font> ADODB.RecordSet <font color="blue">Dim</font> tBook <font color="blue">As</font> Excel.Workbook <font color="blue">Set</font> tBook = GetObject(CurrentProject.Path & <font color="teal">"\TestCnn.xls"</font>) tBook.Activate <font color="00AA00">'tBook.Application.Visible = True</font> <font color="00AA00">'tBook.Windows(1).Visible = True</font> <font color="blue">Call</font> tBook.Application.Run(<font color="teal">"testCnn.XLS!SetCnn"</font>, _ CurrentProject.Connection, Rec) <font color="blue">end</font> <font color="blue">sub</font>
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д