Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
je viens de tester une formule qui me paraît fonctionner :=DROITE(A1;NBCAR(A1)-(CHERCHE("µ";SUBSTITUE(A1;{0.1.2.3.4.5.6.7.8.9};"µ";NBCAR(A1)-NBCAR(SUBSTITUE(A1;{0.1.2.3.4.5.6.7.8.9};"")))))-1)
Bonjour, je réouvre ce fil car la formule ne fonctionne pas avec :
33 rue de la Salle 05000 GAP = 000 Gap
Quelqu'un a-t-il une idée ?
Bonne journée à toutes et tous
Ton code avec insérerphoto fonctionne bien.
Mais InsérerImages ne fonctionne pas.
Je viens d'essayer ton code mais l'homothétie n'est pas respectée. L'image est étirée aux 4 coins de la cellule
Bonjour à toutes et tous,
J'utilise un code VBA trouvé sur Internet qui me permet d'insérer des photos dans mon fichier Excel.
Je souhaiterai conserver l'homothétie de la photo et la centrer dans la cellule. (LockAspectRatio = msoTrue)
Par avance merci pour votre aide
Bonjour à toutes et tous,
J'utilise le code ci-dessous pour faire un zoom sur image.
J'aurai souhaité que quand on clique sur l'image pour zoomer elle se mette au 1er plan. j'ai essayé, sans succès, d'insérer l'instruction :
Selection.ShapeRange.ZOrder msoBringToFront
Par avance merci pour...
@ bof
Effectivement une recherche sur internet confirme tes dires.
J'ai trouvé sur un forum un fichier qui affiche les .png
Je suis incapable de m'aider de ce fichier mais si ça peut aider l'un d'entre-vous à résoudre mon problème ...
Par avance merci pour vos solutions.
Bonjour le Forum,
J'ai modifié le code comme suit, les images ".jpg", ".gif", ".bmp" s'affichent correctement mais pas les ".png"
Il y a une demande de deboguage sur la ligne (erreur d'exécution 481 Image incorrecte) :
UserForm1.Image1.Picture = LoadPicture(répertoire & "\" & NomImage & c)...
Bonjour à toutes et tous,
J'ai retrouvé un fichier (affichephoto2.xls) du regretté Jacques Boisgontier, mais qui me génère une erreur sur la ligne :
rap = Val(Split(taille, "x")(0)) / Val(Split(taille, "x")(1))
je joins le fichier en PJ
quelqu'un peut-il m'aider à faire fonctionner ce code...
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.