Microsoft 365 macro copier coller feuille active et autre feuille

[pat66]

bonjour le forum,

voila la macro que je souhaite conserver, (merci à Dranreb)
If IsEmpty(Target.Value) Then Me.[AG136].Value = Me.[AO28].Value (feuille active)

mais je voudrai aussi coller en même temps :
Me.[AO28].Value sur la feuille 3 dans la cellule ("AG136")

un grand merci à tous

 

[Dranreb]

Bonjour.
Mettez :

If IsEmpty(Target.Value) Then
   Me.[AG136].Value = Me.[AO28].Value ' (feuille active)
   Feuil3.[AG136].Value = Me.[AO28].Value ' (feuille "Feuil 3")
   End If

Si toutefois Feuil3 est bien le nom de l'objet Worksheet représentant la feuille destinataire.

 

[pat66]

Bonjour

c'est parfait !!

merci beaucoup