Pasting hyperlink from sheet A to Sheet B?

[Chet]

Does anyone know how to paste a hyperlink from sheet A cells(1,1) to
Sheet B cells(3,3) using VBA? The macro recorder apparently won't do
it for reasons unbeknownst to me.

Thanks,
Chet

 

[Guest]

Sub chet()
Set r1 = Sheets("Sheet A").Cells(1, 1)
Set r2 = Sheets("Sheet B").Cells(3, 3)
r1.Copy r2
End Sub


This wil take the hyperlink stored in Sheet A and copy it to Sheet B

 

[Chet]

Hi Gary's student,
Are you sure that will copy the hyperlink and not just the cell
values? Thx Chet

 

[Chet]

It did work.. !.. nice and simple.. i like it..!.. thx Chet

 

[Guest]

I just tested it. Put http://www.cnn.com in A1

it copied EVERYTHING:

1. cell contents
2. cell formatting
3. cell hyperlink
4. cell comments

Just give it a try