从sql导成到excel文件时，如何给excel里的某列的单元格数据加一个超链接

Question

从sql导成到excel文件时，如何给excel里的某列的单元格数据加一个超链接(指向硬盘中的另一个文件）

Answer 1

参考excel的宏：
￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣
    ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
        "C:\Documents and Settings\Administrator.LENOVO-4351A3A0\My Documents\My Pictures\样品.jpg" _
        , TextToDisplay:="中华人民共和国"

Answer 2

我试成功了，可是新问题又来了：
 Sheet1.Hyperlinks.Add(sheet1.Range['a1'],'D:\myprog\05030328.tif',dbgrid.Fields[0].DisplayText);我想要得是a1是变量，比如a+i,i是从0到10，
可是range[]好像不支持变量，还是我书写有误，我是这样写的
str:=''''+'a'+inttostr(i)+'''';
如果i=1时，showmessage(str);的效果是 'a1'，按理应该可以呀。
但是我 把 str带入range[str]就不行。