Re,
Ton code n'a pas de sens. Déjà tu incrémentes tes lignes pour afficher le nom de tes Sté de 35 en 35
DX = Worksheets("Feuil2").Range("A65536").End(xlUp).Row + 35
Les noms de tes stés. sont inscrites en colonne A de ta feuille 2.
Tu tentes d'écrire ces noms de stés. sur la Feuil1 en allant les chercher sur la colonne E de ta Feuil2 ???
O24 = =Feuil2!E1
Explique nous tout ??