Redimensionner une photo avec un Macro

Résolu/Fermé
kikou93 Messages postés 417 Date d'inscription mardi 4 février 2014 Statut Membre Dernière intervention 24 septembre 2018 - 22 janv. 2016 à 10:44
kikou93 Messages postés 417 Date d'inscription mardi 4 février 2014 Statut Membre Dernière intervention 24 septembre 2018 - 27 janv. 2016 à 21:33
Bien le bonjour,

Voici ma demande :

Je voudrais un micro qui me permet de redimensionner une photo qui est déjà présente dans le fichier Excel, juste en cliquant sur un bouton.

Et si c'est possible de l'enregistrer cette photo redimensionner dans un dossier.

J'ai bien trouvé un mais il ne permet pas de redimensionner la photo mais plutôt de la ranger (Fonction Ranger).

Une dernière chose, si vous pouvez m'envoyer un fichier joint, je vous serai très reconnaissant.

Merci de bien vouloir m'aider.

2 réponses

cs_Le Pivert Messages postés 7823 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 30 septembre 2022 716
22 janv. 2016 à 15:21
Bonjour,

Voici un exemple:

http://www.cjoint.com/c/FAwouwV8Z2Q
1
kikou93 Messages postés 417 Date d'inscription mardi 4 février 2014 Statut Membre Dernière intervention 24 septembre 2018 1
22 janv. 2016 à 16:34
Merci de m'avoir répondu aussi rapidement ton excel est super •‿•
, si ca vous ne dérange pas est-ce que c'est possible de modifier quelques petites choses comme :

1. La hauteur et la largeur quand la photo est redimensionner sont les mêmes (la photo est sous forme carrée), je veux avoir la possibilité de choisir (Largeur ≠ Hauteur) "la photo soit sous forme rectangulaire";

2. Est-ce que c'est possible de créer un bouton en cliquant dessus me permet d'importer des photos au lieu de passer par insertion ----> image?.

J'attend avec impatience votre réponse
0
cs_Le Pivert Messages postés 7823 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 30 septembre 2022 716
22 janv. 2016 à 16:44
Pour inserer une image voir ceci:

https://excel.developpez.com/faq/?page=Image#InsertionImage

L'image est redimensionnée proportionnellement par rapport a sa plus grande dimension:
Hauteur pour les portraits et largeur pour les paysages.

Changer la hauteur et le largeur indépendamment déforme l'image

@+
0
cs_Le Pivert Messages postés 7823 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 30 septembre 2022 716
22 janv. 2016 à 18:06
Je pense t'avoir tout expliqué!

Désolé je ne peux pas faire plus

Cdlt
0
kikou93 Messages postés 417 Date d'inscription mardi 4 février 2014 Statut Membre Dernière intervention 24 septembre 2018 1 > cs_Le Pivert Messages postés 7823 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 30 septembre 2022
23 janv. 2016 à 10:00
Bonjour,

Désolé de te déranger encore fois, j'ai juste un petit problème.

J'ai rendu un fichier plus présentable en ajoutant la fonction importer une Image.

Je ne sais pas quel est le problème mais maintenant la hauteur reste fixe seul la largeur change.

Aide-moi s'il te plaît, Voici le Fichier :


https://www.cjoint.com/c/FAxi04uJzMP

Merci D'avance.
0
cs_Le Pivert Messages postés 7823 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 30 septembre 2022 716 > kikou93 Messages postés 417 Date d'inscription mardi 4 février 2014 Statut Membre Dernière intervention 24 septembre 2018
23 janv. 2016 à 14:05
Voilà:

http://www.cjoint.com/c/FAxnfnp6myQ
0
cs_Le Pivert Messages postés 7823 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 30 septembre 2022 716
22 janv. 2016 à 16:29
Voici une nouvelle mouture, tout est automatisé!

http://www.cjoint.com/c/FAwpyKYa1uQ
0
kikou93 Messages postés 417 Date d'inscription mardi 4 février 2014 Statut Membre Dernière intervention 24 septembre 2018 1
22 janv. 2016 à 17:50
C'est une bonne idée ce que tu as fait, mais ce n'ai toujours pas ce que j'ai demandé. Il y a au doussus des images (créer avec paint) qui montre et explique ce que je veux.

https://www.cjoint.com/c/FAwqYbIEbge

Merci et désolé de vous prendre de votre temps.
0