You could change the hyperlink "style" for the workbook.
That would have to be repeated for each workbook.
-or-
Add a couple lines of code to your existing code...
ActiveCell.Font.Underline = xlUnderlineStyleNone
ActiveCell.Font.ColorIndex = xlColorIndexAutomatic
--
Jim Cone
Portland, Oregon USA .
http://www.mediafire.com/PrimitiveSoftware .
(Extras for Excel add-in: convenience built-in)





"John"
wrote in message
...
In a macro I am adding hyperlinks using the following code:

Cells(i, "H").Select ActiveSheet.Hyperlinks.Add Anchor:=Selection,
Address:="http://blahblahbla"

Is it possible to add a hyperlink in this fashion without changing the
formating of cell?

Thanks for looking.