Re : Garder un lien Hypertexte d'une feuille a l'autre
Salut,
Je ne sais pas si j'ai bienouis la question, mais :
Sub Macro1()
'
' Macro1 Macro
'
'
Range("I8").Select ' avec un lien x
Application.CutCopyMode = False
Selection.Copy
Range("K10").PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False ' copie avec lien
Range("K13").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False 'copie sans lien
Range("D10").Select
ActiveSheet.Paste Link:=True 'copie avec liaison
End Sub
Ca ne convient pas ?
A+