OVH Cloud OVH Cloud

Appareil Photo / VBA

6 réponses
Avatar
Philippe
Bonjour,
Quand je veux copier une plage d'une feuille ailleurs en tant qu'image,
j'utilise l'appareil photo dans Excel. C'est bien pratique.
J'ai essayé d'enregistrer cette manip par l'enregistreur de macros,mais il
ne m'enregistre qu'un simple copier/coller classique.
Comment manier cet outil en VBA ?

Merci d'avance,

Philippe

6 réponses

Avatar
Pierre CFI [mvp]
bonjour
mais si tu fais shift+ edition tu as le menu copier image
et la macro enregistrer donne çà
Selection.CopyPicture Appearance:=xlScreen, Format:=xlPicture
Sheets("Feuil2").Select
ActiveSheet.Paste


--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

"Philippe" a écrit dans le message de news: c2a74q$
Bonjour,
Quand je veux copier une plage d'une feuille ailleurs en tant qu'image,
j'utilise l'appareil photo dans Excel. C'est bien pratique.
J'ai essayé d'enregistrer cette manip par l'enregistreur de macros,mais il
ne m'enregistre qu'un simple copier/coller classique.
Comment manier cet outil en VBA ?

Merci d'avance,

Philippe




Avatar
Philippe
Merci, mais si je fais comme cela, l'image n'est plus liée, c'est-à-dire que
si je modifie le contenu de la cellule origne, le contenu de l'image n'est
pas modifiée, et reste comme elle était au moment de la copie.
Avec l'appareil photo, l'image reste liée à la cellule, ou plage d'origine.

Philippe

"Pierre CFI [mvp]" a écrit dans le message news:

bonjour
mais si tu fais shift+ edition tu as le menu copier image
et la macro enregistrer donne çà
Selection.CopyPicture Appearance:=xlScreen, Format:=xlPicture
Sheets("Feuil2").Select
ActiveSheet.Paste


--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

"Philippe" a écrit dans le message de news:
c2a74q$

Bonjour,
Quand je veux copier une plage d'une feuille ailleurs en tant qu'image,
j'utilise l'appareil photo dans Excel. C'est bien pratique.
J'ai essayé d'enregistrer cette manip par l'enregistreur de macros,mais
il


ne m'enregistre qu'un simple copier/coller classique.
Comment manier cet outil en VBA ?

Merci d'avance,

Philippe








Avatar
Modeste
Bonjour,
une autre solution avec
une plage nommée "Résultats2003"
et une image pré-existante "MonImage"

qui garde la dynamique de la plage souhaitée :
ActiveSheet.Shapes("MonImage").Select
Selection.Formula = Résultats2003

@+


-----Message d'origine-----
Bonjour,
Quand je veux copier une plage d'une feuille ailleurs en
tant qu'image,

j'utilise l'appareil photo dans Excel. C'est bien
pratique.

J'ai essayé d'enregistrer cette manip par l'enregistreur
de macros,mais il

ne m'enregistre qu'un simple copier/coller classique.
Comment manier cet outil en VBA ?

Merci d'avance,

Philippe


.



Avatar
Pierre CFI [mvp]
mais je connaissais l'appareil photo dans les versions 3 et 4, mais là dans 2002 ou 2003 je vois pas

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Philippe" a écrit dans le message de news: c2a8vh$
Merci, mais si je fais comme cela, l'image n'est plus liée, c'est-à-dire que
si je modifie le contenu de la cellule origne, le contenu de l'image n'est
pas modifiée, et reste comme elle était au moment de la copie.
Avec l'appareil photo, l'image reste liée à la cellule, ou plage d'origine.

Philippe

"Pierre CFI [mvp]" a écrit dans le message news:

bonjour
mais si tu fais shift+ edition tu as le menu copier image
et la macro enregistrer donne çà
Selection.CopyPicture Appearance:=xlScreen, Format:=xlPicture
Sheets("Feuil2").Select
ActiveSheet.Paste


--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

"Philippe" a écrit dans le message de news:
c2a74q$

Bonjour,
Quand je veux copier une plage d'une feuille ailleurs en tant qu'image,
j'utilise l'appareil photo dans Excel. C'est bien pratique.
J'ai essayé d'enregistrer cette manip par l'enregistreur de macros,mais
il


ne m'enregistre qu'un simple copier/coller classique.
Comment manier cet outil en VBA ?

Merci d'avance,

Philippe












Avatar
Philippe
La solution semble effectivement être là, mais nécessite que l'image soit
préexistente.
Cela me suffit à aller plus loin dans mon projet pour l'instant, mais si
quelqu'un peut me donner la façon de la créer en VBA...

Merci beaucoup en tout cas

Philippe

"Modeste" a écrit dans le message news:
794501c402cf$cea3bea0$
Bonjour,
une autre solution avec
une plage nommée "Résultats2003"
et une image pré-existante "MonImage"

qui garde la dynamique de la plage souhaitée :
ActiveSheet.Shapes("MonImage").Select
Selection.Formula = Résultats2003

@+


-----Message d'origine-----
Bonjour,
Quand je veux copier une plage d'une feuille ailleurs en
tant qu'image,

j'utilise l'appareil photo dans Excel. C'est bien
pratique.

J'ai essayé d'enregistrer cette manip par l'enregistreur
de macros,mais il

ne m'enregistre qu'un simple copier/coller classique.
Comment manier cet outil en VBA ?

Merci d'avance,

Philippe


.



Avatar
ChrisV
Bonjour Philippe,

Pour conserver la liaison avec la plage d'origine...

Selection.Copy
ActiveSheet.Pictures.Paste(Link:=True).Select


ChrisV


"Philippe" a écrit dans le message de
news:c2a74q$
Bonjour,
Quand je veux copier une plage d'une feuille ailleurs en tant qu'image,
j'utilise l'appareil photo dans Excel. C'est bien pratique.
J'ai essayé d'enregistrer cette manip par l'enregistreur de macros,mais il
ne m'enregistre qu'un simple copier/coller classique.
Comment manier cet outil en VBA ?

Merci d'avance,

Philippe