Remplir colonne A en fonction de E

Bonjour à tous,

je galère depuis quelques heures pour un truc qui doit être tout simple.

J'ai enregistré une macro que voici :

Sub CreaPath()
'
' CreaPath Macro
'
    Range("A3").Select
    ActiveCell.FormulaR1C1 = "=Image(RC[4]&"".jpg"",Path)"
    Range("A3").Select
    Selection.AutoFill Destination:=Range("A3:A8")
    Range("A3:A8").Select
End Sub

Je voudrais que cette formule soit valable en fonction du nombre de produits en E.

Pour cette exemple lors de l'enregistrement de cette macro, je n'avais que 6 produits de E3;E8 or si je veux l'utiliser dans un autre document incluant plus ou moins de lignes, il faut que je l'adapte.

Est-ce qu'il y un moyen plus simple en modifiant le code d'arriver à mes fins?

Merci de votre aide.

12fichier.xlsm (26.84 Ko)

Voili voilou.

43fichier.xlsm (27.34 Ko)
Greg.leo a écrit :

Voili voilou.

Un grand merci à toi pour ton aide et ta réactivité.

C'est exactement ce qu'il me fallait.

Merci

Rechercher des sujets similaires à "remplir colonne fonction"