Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Adding hyperlinks to excel
Message
From
11/03/2014 11:23:55
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Title:
Adding hyperlinks to excel
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows Server 2012
Network:
Windows 2008 Server
Database:
MS SQL Server
Application:
Web
Miscellaneous
Thread ID:
01596105
Message ID:
01596105
Views:
49
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()
Next
Reply
Map
View

Click here to load this message in the networking platform