Try something like the following

Dim HL As Hyperlink
Dim WS As Worksheet
Set WS = ActiveSheet
Set HL = WS.Hyperlinks.Add(Range("A1"),
"http://www.cpearson.com", , , "Pearson")
HL.AddToFavorites
HL.Delete
Range("A1").Clear


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"mvelez3 " wrote in
message ...
I'm trying to write some code that will do various tasks as
part of a
new system implementation. The code needs to run on many PCs
with
various combinations of software installed.

Originally I thought of using VBA in Ms Access to do it and I
wrote
code that worked fine. But not all PCs have Access installed.
Now I'm
thinking of doing with Excel (as all PCs should have Ms Office
Std
installed).

One of the tasks is to save in the IE "Favorites" folder a
favorite to
a particular hyperlink address. In Access I used the
"HyperLink.AddToFavorites" method and it worked just fine. It
doesn't
seem to work in Excel.

The address I'm trying to save goes something like this:

"http://server.network.net:7781/forms90/f90servlet?config=bfoc&fo
rm=issz003.fmx".
Does anyone know how I could do this?

I need not just the code to access the Favorites folder but
also the
code to add the new Favorite.


---
Message posted from http://www.ExcelForum.com/