Add-in按钮操作当前excel文档问题。(100分)

我现在已经做好了按钮，想在当前已经打开的excel文档里通过addin方式的按钮进行添加文字到excel里，步骤是：直接运行打开一个空的excel、或者直接打开d:/1.xls，注：
（不是 ExcelApp.WorkBooks.Open( 'd:/1.xls' )打开 ），点击按钮，添加文字到当前选中的单元格里。出现问题了，一般的资料都是 先：

1、ExcelApp := CreateOleObject( 'Excel.Application' );

2、ExcelApp.WorkBooks.Open( 'd:/1.xls' );

3、ExcelApp.Cells[1,1].Value := '111111';

我现在不是要重新打开一个硬盘里的excel文档，而是对已经打开的文档进行编辑，不知道如何open，是不是要写self。。。。 怎么写啊？

直接运行打开一个空的excel、或者直接打开d:/1.xls，注

我现在不是要重新打开一个硬盘里的excel文档，而是对已经打开的文档进行编辑

似乎前后矛盾啊　，再说后面的为什么要如此，不明白

我使用按钮 对当前已经打开的excel文档进行编辑,目的就是要做 类似电子签章 的效果,比如可以 对当前已经打开的文档添加文字 或者锁定文档,或者添加图片 等等