在线跪求！如何用变量引用工作表

blmm

遇到一个难题，请各位高手指教：

有一张表格有很多地方需要引用其它的工作表，如：“0509”中A2的内容，地方少可以用‘0509’！A2手工输入来表示，但如果有很多地方都需要输入‘0509’！就很麻烦，而且如果想改成引用0510工作表的内容，又要全部重新输入，非常麻烦。

请教各位，能不能用一个变量，比如一个单元格，来代替“0509”的名称，这样修改这个单元格，就可以自动引用“0510”等其它工作表中的内容。

请高手不吝赐教，多谢！！！

[此贴子已经被作者于2005-6-19 22:33:42编辑过]

晓月清风

使用一个自定义函数:

Function SnameGV(sname As Range, xcell As Range)

'引用名为SNAME工作表中XCELL的值

         Application.Volatile

         With Application.Caller.Parent

              SnameGV = .Parent.Sheets(sname.Value).Range(xcell.Address).Value

         End With

End Function

晓月清风

顺便把文件也上传给你：

blmm

多谢大大的关心！谢谢谢谢！