I have changed a couple of lines below, not tried them but give it a go
it should work
Regards,
Simon
Sub McrUpdateLink()
'
' McrUpdateLink Macro
' Macro recorded 06/15/2006
Cells.Select
Selection.Copy
ActiveSheet.Previous.Select
Cells.Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=
_
False, Transpose:=False
Application.CutCopyMode = False
Range("A2").Select
Sheets("Link").Select 'I think this is the line you need
Range("H2").Select
ActiveSheet.paste 'and this one to paste in to H2 on the sheet named
Link
End Sub
--
Simon Lloyd
------------------------------------------------------------------------
Simon Lloyd's Profile:
http://www.excelforum.com/member.php...fo&userid=6708
View this thread:
http://www.excelforum.com/showthread...hreadid=552359