Hauteur de l'image définie et largeur variable.

Bonjour,

Je suis débutant débutant en macro,
J'ai inséré une image à l'aide de :

"Feuil1.Shapes.AddPicture(image, msoFalse, msoCTrue, 0, 0, 100, 90)"

J'aimerais garder une hauteur fixe, ici 90 mais souhaiterais que la largeur soit variable afin de garder les proportions de la photo d'origine.
Est il possible de rajouter quelque chose à la place du 100 pour obtenir ce résultat?
Sinon avez vous une solution simple svp.

Merci d'avance