高手们，帮帮忙啊，怎么用代码实现在excel里面加超链接！！在线给分 (50分)

我用录制宏得到的vb是以下这条语句：
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="Photo/32.JPG", TextToDisplay:="/photo/32.jpg"
现在我用ole创建sheet
Excel:=CreateOleObject('Excel.Application');
Sheet:=Excel.Workbooks[1].WorkSheets[1];
比如我要在Sheet.cells[2,40]里面创建超链接，我该怎么把上面的vb代码转为delphi代码呢？
请大家指教

ExcelWorksheet.Range[2,40].Value:='=HYPERLINK("http://www.microsoft.com","Microsoft")';

接受答案了.