OVH Cloud OVH Cloud

Enregistrer en tant qu'image

6 réponses
Avatar
garnote
Bonsoir,

J'ai groupé une forme automatique (flèche)
avec une zone de texte. Question :
Comment faire pour enregistrer mon groupement
en tant qu'image ?

Merci

Serge

6 réponses

Avatar
isabelle
Salut Serge,

une solution pas très élégante mais qui dépanne.

Sub CopierVersPaint()
Dim p
ActiveSheet.Shapes("Group 4").Copy
Shell "mspaint.exe", vbNormalFocus
With ActiveWindow
SendKeys "%"
SendKeys "{RIGHT}"
SendKeys "{DOWN 5}"
SendKeys "~"
SendKeys "~"
End With
Application.CutCopyMode = False
End Sub

isabelle


Bonsoir,

J'ai groupé une forme automatique (flèche)
avec une zone de texte. Question :
Comment faire pour enregistrer mon groupement
en tant qu'image ?

Merci

Serge


Avatar
Ricky
Bonjour garnote et tous les lecteurs
| Bonsoir,
|
| J'ai groupé une forme automatique (flèche)
| avec une zone de texte. Question :
| Comment faire pour enregistrer mon groupement
| en tant qu'image ?
|
| Merci
|
| Serge

Insérer la forme
Compléter avec le texte
Sélectionner la forme
Copier
Ouvrir Paint
Coller
Sauver en JPG par exemple

--
Ricky [MVP] Visitez les faq....
http://www.faqoe.com http://faq.ms.word.free.fr
http://dj.joss.free.fr/faq.htm http://www.excelabo.net
http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Avatar
garnote
Bonjour Ricky et Isabelle,

Merci pour vos suggestions mais :
Avec Paint, l'option Coller n'est pas disponible;
Avec MsPaint, l'image enregistrée est «1 000 fois»
plus grande et la macro d'Isabelle ne fonctionne pas.
Faut dire qu'il est un peu tôt et que je dois courir
au travail dans quelques secondes !!!

Serge




"Ricky" a écrit dans le message de news:
u4pyai#
Bonjour garnote et tous les lecteurs
| Bonsoir,
|
| J'ai groupé une forme automatique (flèche)
| avec une zone de texte. Question :
| Comment faire pour enregistrer mon groupement
| en tant qu'image ?
|
| Merci
|
| Serge

Insérer la forme
Compléter avec le texte
Sélectionner la forme
Copier
Ouvrir Paint
Coller
Sauver en JPG par exemple

--
Ricky [MVP] Visitez les faq....
http://www.faqoe.com http://faq.ms.word.free.fr
http://dj.joss.free.fr/faq.htm http://www.excelabo.net
http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm



Avatar
Jerry Khann
Salut,

1- tu sélectionnes ton groupe;
2- tu fais "copier" (il est dans le presse-papier en tant qu'image)
3- tu ouvres "mspaint" ou tout autre éditeur d'images bitmap
4- tu fais "coller"
5- tu fais "enregistrer sous" dans le format qui te va bien,
.bmp par exemple

A+

^o^
--

Jerry Khann

Adresse invalide: retirer le bouchon _O_ et .invalid
Avatar
Ricky
Bonjour garnote et tous les lecteurs
| Bonjour Ricky et Isabelle,
|
| Merci pour vos suggestions mais :
| Avec Paint, l'option Coller n'est pas disponible;
| Avec MsPaint, l'image enregistrée est «1 000 fois»
| plus grande et la macro d'Isabelle ne fonctionne pas.
| Faut dire qu'il est un peu tôt et que je dois courir
| au travail dans quelques secondes !!!
|
| Serge
|

Microsoft Paint 5.1 sous XP . Une bulle avec 2 mots en JPG en 480x374
fait 5 ko

--
Ricky [MVP] Visitez les faq....
http://www.faqoe.com http://faq.ms.word.free.fr
http://dj.joss.free.fr/faq.htm http://www.excelabo.net
http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Avatar
isabelle
salut Serge,

c'est quoi qui ne fonctionne pas, as tu un message d'erreur ?

isabelle


Bonjour Ricky et Isabelle,

Merci pour vos suggestions mais :
Avec Paint, l'option Coller n'est pas disponible;
Avec MsPaint, l'image enregistrée est «1 000 fois»
plus grande et la macro d'Isabelle ne fonctionne pas.
Faut dire qu'il est un peu tôt et que je dois courir
au travail dans quelques secondes !!!

Serge

"Ricky" a écrit dans le message de news:
u4pyai#
Bonjour garnote et tous les lecteurs
| Bonsoir,
|
| J'ai groupé une forme automatique (flèche)
| avec une zone de texte. Question :
| Comment faire pour enregistrer mon groupement
| en tant qu'image ?
|
| Merci
|
| Serge

Insérer la forme
Compléter avec le texte
Sélectionner la forme
Copier
Ouvrir Paint
Coller
Sauver en JPG par exemple

--
Ricky [MVP] Visitez les faq....
http://www.faqoe.com http://faq.ms.word.free.fr
http://dj.joss.free.fr/faq.htm http://www.excelabo.net
http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm