VBA--Option de collage

[JJ1]

Bonjour,

J'ai commencé un début de code "explicit" en Feuil1, qui consiste quand je clic sur une cellule de la colonne AL de copier le contenu de la ligne cliquée en $U$5:$AA$5.(cellules AL:AR de la ligne concernée par le clic à déplacer)

ex: je clic en AL13, alors 1 7 20 25 40 6162 se copie en $U$5.


Merci si vous pouvez m'aider à terminer mon code.

Bonne soirée
je joins un exemple.

 

[Papou-net]

Re : VBA--Option de collage

Bonsoir JJ1,

Je ne suis pas certain d'avoir bien compris, mais voici le résultat de mon interprétation.

Cordialement.

 

[Dranreb]

Re : VBA--Option de collage

Bonjour.
Cette instruction judicieusement placée le fait, où est le problème ?

If Target.Column = 38 And Target.Rows.Count = 1 Then Me.[U5:AA5].Value = Target.Resize(1, 7).Value

Bonjour Papou-net.

 

[JJ1]

Re : VBA--Option de collage

Bonjour,
Merci à vous 2, j'ai pris le code de Papounet qui fonctionne bien.

A+