Можно ли и как Передать ссылку на объект от одного 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 приложения другому ?»

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>
 

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

10   голосов , оценка 4.1 из 5
Похожие ответы