Macro Copie tableau et diagramme sous forme d'image

Résolu

massimo888 Messages postés 203 Date d'inscription Statut Membre Dernière intervention -
massimo888 Messages postés 203 Date d'inscription Statut Membre Dernière intervention - 25 juin 2014 à 13:55

Bonjour,
Je cherche à faire une Macro en VBA pour pouvoir copier un tableau et le coller sous format image dans un autre classeur EXCEL.
Et la même action pour diagramme.
PS: Si cela est faisable, Peut-on également contrôler la taille de l'image?

Merci d'avance.

Afficher la suite

A voir également:

Macro Copie tableau et diagramme sous forme d'image
Tableau word - Guide
Tableau ascii - Guide
Mise en forme conditionnelle excel - Guide
Copie cachée - Guide
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur

2 réponses

Réponse 1 / 2

f894009 Messages postés 17277 Date d'inscription Statut Membre Dernière intervention 1 713

Bonjour,

a voir:

http://jacxl.free.fr/cours_xl/cours_xl_jac.html#xl_en_gif

Réponse 2 / 2

massimo888 Messages postés 203 Date d'inscription Statut Membre Dernière intervention

Merci beaucoup!!
Ça marche très bien!!
Juste est-ce que tu peux me dire si on peut faire en sorte pour régler la taille de l'image?
Merci encore

massimo888 Messages postés 203 Date d'inscription Statut Membre Dernière intervention

Et aussi, si on pourrait la coller et que l'image ne soit pas figé
Merci

massimo888 Messages postés 203 Date d'inscription Statut Membre Dernière intervention

En fait l'image n'est pas figé! Au temps pour moi
Juste, on peut demander à ce que l'image soit envoyer à une cellule précise?

f894009 Messages postés 17277 Date d'inscription Statut Membre Dernière intervention 1 713

Re,

https://forums.commentcamarche.net/forum/affich-2328371-excel-inserer-une-image-ds-la-cellule-active

massimo888 Messages postés 203 Date d'inscription Statut Membre Dernière intervention

Merci pour ton aide mais ça ne marche pas vraiment il me met toujours l'image tout au début de la feuille!!
Merci.

f894009 Messages postés 17277 Date d'inscription Statut Membre Dernière intervention 1 713

Re,

marche tres bien

exemple

Sub pos_img()
    Range("B8").Activate
    ActiveSheet.Pictures.Insert("chemin\image.jpg").Select
    With Selection
        .ShapeRange.Left = ActiveCell.Left
        .ShapeRange.Top = ActiveCell.Top
    End With
    
End Sub

Discussions similaires

Copier un lien instagram

PIX

copie d'un lien dans le navigateur internet

Votre réponse

Discussions similaires