Juste en passant, ça ne règlera pas ton problème mais dans ton code :
.
Code:
Range('E' & numl).Select '-------------------------------==)
ActiveCell.FormulaR1C1 = 'E' ' )
' création du lien hypertexte
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=fap, TextToDisplay:='C'
' ----------------------------------------==)
A quoi sert la ligne de code : ActiveCell.FormulaR1C1 = 'E' ?
[li]Tu sélectionnes une cellule[/li]
[li]Ensuite tu lui affectes la valeur 'E'[/li]
[li]Et ensuite tu y insères un lien avec un 'C' en valeur à afficher... (?)[/li]
Effectivement, j'ai corriger cette double affectation en mettant 'C' partout.
Par rapport à ce que je t'ai envoyé, j'ai juste rajouté le transfert de ma valeur 'don' dans un classeur 'Classeur1.xls' vide, comme tu l'a testé ce qui fonctionne enfin. Ce Pb d'Erreur 1004 n'existait pas avant, Un soucis en cache un autre...