Fusionner deux images en une

Fermé

Sormick Messages postés 146 Date d'inscription dimanche 10 novembre 2013 Statut Membre Dernière intervention 22 septembre 2024 - 19 oct. 2016 à 09:50
Sormick Messages postés 146 Date d'inscription dimanche 10 novembre 2013 Statut Membre Dernière intervention 22 septembre 2024 - 19 oct. 2016 à 09:59

Bonjour,

J'ai deux images dans une feuille
la, deuxième image est par dessus la première.
est t'il possible à partir de ces deux images d'en créer une seule ou de les fusionner en une seule.
peut être avec une macro de ce type??
Selection.CopyPicture _
Appearance:=xlScreen, _
Format:=xlPicture

CDT,

A voir également:

1 réponse

Réponse 1 / 1

Sormick Messages postés 146 Date d'inscription dimanche 10 novembre 2013 Statut Membre Dernière intervention 22 septembre 2024
19 oct. 2016 à 09:59

Je crois que j'ai trouvé mais je ne suis pas sûr:
Voici mon code:

Sheets("feuil1").Shapes.SelectAll
    Selection.Group
  Selection.CopyPicture _
    Appearance:=xlScreen, _
    Format:=xlPicture
  Sheets("jpg").Select
  Range("a1").Select
  ActiveSheet.Paste
  Application.CutCopyMode = False

Discussions similaires

Comment supprimer une conversation Messenger pour les 2 personnes ?

Un seul de mes écouteurs marche. Que faire ?

excel fractionner une cellule horizontalement

code couleur associé a une image

2 comptes facebook avec même mail et même nom