ＶＢから既に開いているエクセルにデータを書き込むには？

解決

ＶＢ初心者 2007-07-12 11:09:55 No: 136946

ＶＢから既に開いているエクセルにデータを書き込むにはどうすればいいでしょうか？

エクセルを新規で開いて特定のセルへデータを書き込む方法は、
例えば以下のようなものをネットでみる事はできたのですが
   Dim xlApp   As Excel.Application
   Dim xlBook  As Excel.Workbook
   Dim xlSheet As Excel.Worksheet

   Set xlApp = CreateObject("Excel.Application")
   Set xlBook = xlApp.Workbooks.Add
   Set xlSheet = xlBook.Worksheets(1)
   xlApp.Visible = True
   xlSheet.Cells(1, 1).Value = "1"

このようにエクセルを新しく開くのではなく
既に開いているエクセルに、かつ、書き込むセルも直前にアクティブになっているセルに対して書き込むにはどうすればいいのでしょうか？

魔界の仮面弁士 2007-07-12 13:00:33 No: 136947

> 既に開いているエクセルに、かつ、書き込むセルも直前に
> アクティブになっているセルに対して書き込むには
> どうすればいいのでしょうか？
GetObject(,"Excel.Application").ActiveCell.Value = "あいうえお"
とか。

ＶＢ初心者 2007-07-12 15:51:58 No: 136948

ありがとうございます。
簡単にできちゃうんですね。
感動しました。

ＶＢ初心者 2007-07-12 20:31:01 No: 136949

解決です。
どうもありがとうございました。
チェックを忘れてました。