我是一个菜鸟，我现在在Excel 2000里有一个很棘手的问题需要解决，想请各位大侠赐教！谢谢!

我在工具栏上自定义了一个按钮（此按钮需要指定一个宏），当活动单元格移动到任一位置时，点击此按钮，该单元格内就自动写入（或插入）了我要填写的内容（内容包括任何字符）。此功能有点类似与“插入特殊符号”的功能。在该宏里就需要写入一段程序，但是在程序里指定单元格坐标位置时，由于坐标是一个变量（可能在“F5”也可能在“N28”），所以就需要用“当前单元格”的命令代替指定单元格坐标位置的命令。现在想请教各位大侠，是否有这样的命令？如果有，这个宏又该怎么写？

我也急着想知道答案，因为我编了一个宏，在SEEK到我需要的单元格后，我要获得此单元格的坐标来定位此行内相应的数据单元。

ｖｂ6论坛好像很冷清，没有高手解决问题．

谁说的，主要是第首不会，高手潜水。
Set t = Sheet1.CommandButton1.TopLeftCell
With ActiveWindow
.ScrollRow = t.Row
.ScrollColumn = t.Column
End With

Selection就可以标识当前选中的单元格.eg:Selection=100,则当前选中的单元格就被写入100.
就这么简单.

我就是个菜鸟, 可是还有比我还CAI的鸟啊, 我们一起学习, 一起进步吧

如果你想付给表Sheet1的单元格 "B2" 的值为100, 就写

Sheets("Sheet1").range("B2")=100