does this work?

Sub findandcopyhyperlink()
Sheets("sheet2").Cells.Find(Range("a1")). _
Offset(, 1).Copy Range("b1")
End Sub

--
Don Guillett
SalesAid Software

"akronpow" wrote in
message ...

I am trying to write a macro that takes a value in Sheet 1 and finds it
in Sheet 2. Then once the value is found in sheet 2, the hyperlink
formula in the adjacent right cell is copied over to a specific cell in
Sheet 1. I couldn't use the VLOOKUP function because that just carries
over the value, but I need to formula to copy over.


--
akronpow
------------------------------------------------------------------------
akronpow's Profile:
http://www.excelforum.com/member.php...o&userid=29100
View this thread: http://www.excelforum.com/showthread...hreadid=488236