Try:

oExcel.Range("b2").Select
oExcel.ActiveCell.FormulaR1C1 = "http://www.bbc.co.uk"

Oh! In typing this just now I realized your hypertext link was malformed: "http:/bbc.co.uk" instead of "http://www.bbc.co.uk". Maybe that's the only issue.


>ActiveCell.FormulaR1C1 = "http://www.bbc.co.uk"
> Range("B5").Select
>
>
>>If you go in to Excel, turn on macro recording, and manually add a hyperlink, and then turn off macro recording, and go and examine the macro source code it generated with "edit macros" ... what does it show you?
>>
>>
>>>Hi rick no I'm afraid not.
>>>
>>>
>>>
>>>>Just a guess. Does using .FormulaR1C1 instead of .Value make a difference?
>>>>
>>>>
>>>>>Hi
>>>>>I want put some hyperlinks in a spreadsheet but when I add them they appear as text
>>>>>How can I add a hyperlink and have it appear as such
>>>>>Thanks
>>>>>
>>>>>SET STEP ON
>>>>>oExcel = CreateObject("Excel.Application")
>>>>>if vartype(oExcel) != "O"
>>>>> * could not instantiate Excel object
>>>>> * show an error message here
>>>>> return .F.
>>>>>ENDIF
>>>>>oWorkbook = oExcel.Application.Workbooks.Add()
>>>>>
>>>>>
>>>>>
>>>>>oExcel.Range("b2").Value = "http:/bbc.co.uk"
>>>>>
>>>>>if val(oExcel.Version) > 11
>>>>> oWorkbook.SaveAs("C:\temp\foobar.xls", 56) && xlExcel8
>>>>>else
>>>>> oWorkbook.SaveAs("C:\temp\foobar.xls")
>>>>>ENDIF
>>>>>
>>>>>oExcel.quit()