エクセルから起動したアプリのデータをエクセルのセルに入れたい

質問

エクセルからあるアプリケーションを起動し、そのアプリケーションの中のデータをエクセルのセルに書き込みたいのですが,その方法を教えていただけませんか。
アプリケーションの中に「ocx=ActiveX」が含まれていてそのActiveXのプロパティの値を読み出したいのですが。
よろしくお願いします。

回答No.1

nitscape

これだけの情報では的確な回答を得ることは難しいと思います。

＞アプリケーションの中に「ocx=ActiveX」が含まれていてそのActiveXのプロパティの値を読み出したい
とありますが、このときアプリケーション＝activeXなら簡単ですが、そうでない場合はアプリケーションにActiveXが含まれていてもいなくても少し面倒（アプリ側にデータをやりとりする機構がないとできない）です。

アプリケーション＝activeXの場合は
Set aaa=CreateObject("aaa.bbb")
Cells(1,1) = aaa.data
のような感じで簡単にできます（例えばInternetExplorerもこのタイプです）。

補足

早速のご回答ありがとうございます。
アプリケーションにActiveXを含むのはインストールのためだけです。アプリケーション=ActiveXにすることを思いつきませんでした。
現在はActiveXをＶＢ６で作成し、ActiveXをformにくみこんでＥＸＥファイルを作成しています。

教えていただいたようにしましたら下記のエラーがでました。

プログラム：
Dim xyTable As Object
Set xyTable = CreateObject("xyTable2005.xyTable")
Sheet1.Cells(1, 1) = xyTable.positionX

エラー：
実行時エラー'398'
クライアントサイトが利用できません。
（３行目のSheet1.Cel..が黄色く反転しています）

１）すみませんが、Activex（ファイル名はxyTable2005.ocx）を配布する方法を教えていただけませんか。
２）クライアントサイトが利用できないというエラーの回避方法を教えていただけませんか。
なお、エラーがでたときにはＶＢ６のxyTableのプロジェクトを起動しています。

よろしくお願いします。